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

analyze172.0ms (1.3%)

Memory

5.0MiB live, 402.9MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.5s (11.8%)

Memory

60.9MiB live, 2 890.4MiB allocated

Samples

1.2s

8 256×

valid

Precisions

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

ival-sin: 551.0ms (56.6% of total)

ival-pow2: 171.0ms (17.6% of total)

ival-div: 82.0ms (8.4% of total)

ival-sqrt: 63.0ms (6.5% of total)

ival-mult: 54.0ms (5.5% of total)

ival-add: 43.0ms (4.4% of total)

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

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

Bogosity

preprocess81.0ms (0.6%)

Memory

2.2MiB live, 70.0MiB allocated

Algorithm

1×	egg-herbie

Rules

390×	`unsub-neg`
362×	`times-frac`
340×	`associate-l`
334×	`associate-r`
280×	`distribute-lft-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	45	153
1	101	147
2	211	147
3	383	147
4	831	147
5	1949	147
6	2504	147
7	2781	147
8	2893	147
9	2943	147
10	2958	147
11	2958	147
0	13	16
0	22	16
1	28	16
2	32	16
3	33	16
0	33	11

Stop Event

1×	iter limit
1×	saturated
1×	iter limit
1×	saturated

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

Symmetry

(abs kx)

(negabs th)

(negabs ky)

explain204.0ms (1.6%)

Memory

-17.8MiB live, 359.5MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
13	-	1	(3.8501288645360564e-160 4.262526699731414e-167 6.406860775449342e-53)	`(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	12	0
↳	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`	underflow	52
↳	`(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	12

Confusion

	Predicted +	Predicted -
+	12	1
-	0	243

Precision

1.0

Recall

0.9230769230769231

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	12	0	1
-	0	0	243

Precision?

1.0

Recall?

0.9230769230769231

Freqs

test

number	freq
0	244
1	12

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

77.0ms

512×

valid

Compiler

Compiled 174 to 56 computations (67.8% saved)

Precisions

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

ival-sin: 33.0ms (59.5% of total)

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

ival-div: 3.0ms (5.4% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

eval0.0ms (0%)

Memory: 0.4MiB live, 0.4MiB allocated
Compiler: Compiled 3 to 3 computations (0% saved)

prune1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	94.8%	(*.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 19 to 13 computations (31.6% saved)

simplify5.0ms (0%)

Memory

8.8MiB live, 8.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(sin.f64 ky)
✓	cost-diff	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)))))
✓	cost-diff	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))
✓	cost-diff	7296	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))

Rules

16×	`lower-*.f32`
14×	`lower-*.f64`
6×	`lift-sin.f64`
6×	`*-commutative`
6×	`lower-sin.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	13	66
0	22	66
1	28	66
2	32	66
3	33	66
0	33	51

Stop Event

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

localize54.0ms (0.4%)

Memory

-6.4MiB live, 110.9MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.7%	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
✓	accuracy	99.6%	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
✓	accuracy	99.6%	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
✓	accuracy	95.2%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))

Samples

39.0ms

256×

valid

Compiler

Compiled 68 to 15 computations (77.9% saved)

Precisions

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

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

ival-pow2: 4.0ms (13.9% of total)

ival-div: 2.0ms (7% of total)

ival-mult: 2.0ms (7% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series29.0ms (0.2%)

Memory

12.5MiB live, 52.3MiB allocated

Counts

6 → 120

Calls

Call 1

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

Outputs
#<alt (sin ky)>
#<alt (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))>
#<alt (+ (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))))))>
#<alt (+ (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))))))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sin kx)>
#<alt (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))>
#<alt (+ (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))))))>
#<alt (+ (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))))))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))>
#<alt (/ (* ky (sin th)) (sin kx))>
#<alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (sin th)>
#<alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))>
#<alt (+ (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)))))))))))>
#<alt (+ (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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* 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)))))))>
#<alt (* 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))))))))))>
#<alt (* 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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (/ ky (sin kx))>
#<alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))>
#<alt (+ 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))))))>
#<alt (+ 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))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt ky>
#<alt (* ky (+ 1 (* -1/6 (pow ky 2))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (pow kx 2)>
#<alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))>
#<alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))>
#<alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow (sin kx) 2)>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>
#<alt (pow (sin ky) 2)>

Calls

30 calls:

Time	Variable		Point	Expression
5.0ms	ky	@	inf	(* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th))
3.0ms	kx	@	0	(pow (sin kx) 2)
2.0ms	ky	@	0	(* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th))
2.0ms	th	@	inf	(* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th))
1.0ms	ky	@	inf	(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))

simplify466.0ms (3.6%)

Memory

-12.3MiB live, 600.9MiB allocated

Algorithm

1×	egg-herbie

Rules

14 278×	`lower-fma.f64`
14 278×	`lower-fma.f32`
6 260×	`lower-*.f64`
6 260×	`lower-*.f32`
5 352×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	317	2263
1	1011	2214
2	3860	2122
3	7804	2122
0	8107	1974

Stop Event

1×	iter limit
1×	node limit

Counts

120 → 119

Calls

Call 1

Inputs
(sin ky)
(+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))
(+ (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))))))
(+ (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))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sin kx)
(+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))
(+ (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))))))
(+ (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))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* 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))))
(* 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))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (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)))))))))))
(+ (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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* 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)))))))
(* 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))))))))))
(* 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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* 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))))
(* 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))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 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))))))
(+ 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))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(pow kx 2)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)

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

rewrite279.0ms (2.1%)

Memory

6.5MiB live, 392.8MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

4 346×	`lower-fma.f64`
4 346×	`lower-fma.f32`
3 626×	`lower-*.f32`
3 624×	`lower-*.f64`
2 248×	`lower-pow.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	13	49
0	22	49
1	62	49
2	338	49
3	2902	49
0	8284	34

Stop Event

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

Counts

6 → 294

Calls

Call 1

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

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

eval89.0ms (0.7%)

Memory: 10.3MiB live, 85.5MiB allocated
Compiler: Compiled 12 851 to 1 670 computations (87% saved)

prune82.0ms (0.6%)

Memory

-6.2MiB live, 154.5MiB allocated

Pruning

26 alts after pruning (26 fresh and 0 done)

	Pruned	Kept	Total
New	422	26	448
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	423	26	449

Accuracy

100.0%

Counts

449 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	77.5%	(/.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
	77.4%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
	77.5%	(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)))
	77.1%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 (sin.f64 ky) (sin.f64 th))))
	77.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky))
	73.1%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (sin.f64 ky))) #s(literal 4 binary64)) (sin.f64 kx))) (sin.f64 th))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
▶	47.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	50.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	30.2%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 ky (.f64 ky (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (sin.f64 kx)))) (sin.f64 th))
	32.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	77.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
▶	77.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th))
	51.5%	(.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (/.f64 (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	77.3%	(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
▶	77.4%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	51.5%	(.f64 (sqrt.f64 (sin.f64 ky)) (.f64 (sqrt.f64 (sin.f64 ky)) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	77.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th)))
	22.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (.f64 kx kx) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
	29.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	94.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (sin.f64 th))
	28.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	45.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th)))
	46.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky)))))
▶	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 1 166 to 812 computations (30.4% saved)

simplify91.0ms (0.7%)

Memory

-2.6MiB live, 80.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	128	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
✓	cost-diff	384	(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
✓	cost-diff	1088	(/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th))
✓	cost-diff	128	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
✓	cost-diff	384	(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
✓	cost-diff	0	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
✓	cost-diff	0	(sin.f64 ky)
✓	cost-diff	0	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
✓	cost-diff	0	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
✓	cost-diff	0	(sin.f64 th)
✓	cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
✓	cost-diff	0	(hypot.f64 (sin.f64 ky) (sin.f64 kx))
✓	cost-diff	0	(sin.f64 ky)
✓	cost-diff	0	(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
✓	cost-diff	0	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))

Rules

1 494×	`lower-fma.f32`
1 492×	`lower-fma.f64`
562×	`lower-*.f32`
548×	`lower-*.f64`
412×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	45	423
0	77	416
1	106	414
2	145	405
3	208	387
4	288	387
5	352	387
6	459	387
7	615	387
8	830	373
9	1119	373
10	1637	373
11	1970	373
12	2085	373
13	2095	373
14	2103	373
15	2109	373
0	2109	369

Stop Event

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

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

localize301.0ms (2.3%)

Memory

-4.7MiB live, 422.6MiB allocated

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	accuracy	97.1%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
✓	accuracy	73.3%	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	accuracy	99.5%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky))
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
✓	accuracy	73.3%	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	accuracy	99.7%	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
✓	accuracy	99.6%	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
✓	accuracy	95.2%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
✓	accuracy	51.7%	#s(approx (pow (sin ky) 2) (*.f64 ky ky))
✓	accuracy	100.0%	(sin.f64 th)
✓	accuracy	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
✓	accuracy	100.0%	(sin.f64 kx)
✓	accuracy	99.9%	(hypot.f64 (sin.f64 ky) (sin.f64 kx))
✓	accuracy	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
✓	accuracy	99.7%	(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))

Samples

97.0ms	85×	2	valid
75.0ms	100×	1	valid
34.0ms	71×	0	valid

Compiler

Compiled 432 to 38 computations (91.2% saved)

Precisions

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

ival-cos: 34.0ms (23.1% of total)

ival-sin: 24.0ms (16.3% of total)

ival-mult: 20.0ms (13.6% of total)

adjust: 15.0ms (10.2% of total)

ival-pow2: 14.0ms (9.5% of total)

ival-div: 13.0ms (8.8% of total)

ival-add: 10.0ms (6.8% of total)

ival-sqrt: 8.0ms (5.4% of total)

ival-hypot: 6.0ms (4.1% of total)

ival-sub: 2.0ms (1.4% of total)

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

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

exact: 0.0ms (0% of total)

series74.0ms (0.6%)

Memory

21.3MiB live, 58.0MiB allocated

Counts

21 → 480

Calls

Call 1

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

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

Calls

120 calls:

Time	Variable		Point	Expression
37.0ms	th	@	0	(* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th))
3.0ms	ky	@	0	(* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th))
2.0ms	th	@	inf	(* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th))
1.0ms	kx	@	0	(* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th))
1.0ms	ky	@	0	(* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky))

simplify456.0ms (3.5%)

Memory

21.5MiB live, 685.6MiB allocated

Algorithm

1×	egg-herbie

Rules

7 306×	`lower-fma.f64`
7 306×	`lower-fma.f32`
7 056×	`lower-*.f64`
7 056×	`lower-*.f32`
5 404×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	731	12891
1	2407	12421
2	5994	12309
0	8794	11507

Stop Event

1×	iter limit
1×	node limit

Counts

480 → 477

Calls

Call 1

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

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

rewrite106.0ms (0.8%)

Memory

-20.1MiB live, 175.7MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

792×	`lower-fma.f32`
790×	`lower-fma.f64`
684×	`lower-*.f32`
670×	`lower-*.f64`
632×	`lower-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	45	260
0	77	249
1	271	216
0	1936	216

Stop Event

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

Counts

21 → 319

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

Outputs
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (neg.f64 (*.f64 (sin.f64 ky) (sin.f64 th))) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)) #s(literal -1 binary64))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(sin.f64 ky)
(/.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(*.f64 (sin.f64 ky) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sin.f64 ky))
(*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(hypot.f64 (sin.f64 ky) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(pow.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
(sin.f64 th)
(/.f64 (sin.f64 th) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th)))
(/.f64 (neg.f64 (sin.f64 th)) #s(literal -1 binary64))
(*.f64 (sin.f64 th) #s(literal 1 binary64))
(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (neg.f64 (.f64 (sin.f64 ky) (sin.f64 th))) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)))
(.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 ky)) #s(literal -1 binary64))
(.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
(exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 (fma.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (-.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))
(pow.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(+.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) (.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (-.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))
(*.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(pow.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (cos.f64 #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))))))
(/.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) #s(literal 1/4 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(/.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th)))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 th))) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) (sin.f64 ky))))
(/.f64 (.f64 (neg.f64 (sin.f64 th)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 th))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (.f64 (sin.f64 ky) (sin.f64 th)))
(.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (sin.f64 ky))
(.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64)) (neg.f64 (sin.f64 ky)))
(neg.f64 (/.f64 (sin.f64 th) (/.f64 #s(literal -1 binary64) (sin.f64 ky))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th)))))
(/.f64 (neg.f64 (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (sin.f64 th))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th))) #s(literal -1 binary64))
(*.f64 (sin.f64 ky) (sin.f64 th))
(*.f64 (sin.f64 th) (sin.f64 ky))
(.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 th) #s(literal -1 binary64)) (neg.f64 (sin.f64 ky)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(sin.f64 kx)
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (cos.f64 #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))))))
(/.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) #s(literal 1/4 binary64)) (-.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(.f64 (-.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))
(+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))
(+.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) (/.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 ky ky))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky)))) (.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))))
(.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 ky ky)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(pow.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
(/.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th)))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 th))) (.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -1 binary64) (sin.f64 ky))))
(/.f64 (.f64 (neg.f64 (sin.f64 th)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 ky)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 ky) (sin.f64 th))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 th))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) #s(literal 1 binary64)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal -1 binary64) (sin.f64 ky)))
(/.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(.f64 (sin.f64 ky) (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (.f64 (sin.f64 ky) (sin.f64 th)))
(.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (sin.f64 ky))
(.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64)) (neg.f64 (sin.f64 ky)))

eval225.0ms (1.7%)

Memory: 26.4MiB live, 250.5MiB allocated
Compiler: Compiled 34 378 to 2 310 computations (93.3% saved)

prune176.0ms (1.4%)

Memory

-37.3MiB live, 361.0MiB allocated

Pruning

52 alts after pruning (50 fresh and 2 done)

	Pruned	Kept	Total
New	1 145	35	1 180
Fresh	6	15	21
Picked	3	2	5
Done	0	0	0
Total	1 154	52	1 206

Accuracy

100.0%

Counts

1 206 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.9%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	77.4%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
	13.7%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	77.5%	(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)))
	77.1%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 (sin.f64 ky) (sin.f64 th))))
	77.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky))
	73.1%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (sin.f64 ky))) #s(literal 4 binary64)) (sin.f64 kx))) (sin.f64 th))
▶	99.5%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	48.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	55.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
	47.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	27.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	32.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	45.7%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	77.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
▶	77.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	77.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
▶	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	38.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	86.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	41.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th))
	42.1%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	32.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	33.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	30.7%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	51.5%	(.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (/.f64 (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	33.7%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	77.4%	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.3%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.6%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (*.f64 th (sin.f64 ky))))
	29.3%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (*.f64 ky (sin.f64 th))))
	37.7%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	30.5%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	51.5%	(.f64 (sqrt.f64 (sin.f64 ky)) (.f64 (sqrt.f64 (sin.f64 ky)) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	33.6%	(.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	12.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
	77.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th)))
	22.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (.f64 kx kx) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
	29.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	28.7%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	28.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	45.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th)))
✓	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)))
▶	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	14.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	28.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
▶	30.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	37.5%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky)))))

Compiler

Compiled 2 430 to 1 645 computations (32.3% saved)

simplify106.0ms (0.8%)

Memory

2.9MiB live, 81.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
✓	cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
✓	cost-diff	384	(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
✓	cost-diff	128	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
✓	cost-diff	384	(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
✓	cost-diff	0	(sin.f64 th)
✓	cost-diff	0	(*.f64 (sin.f64 th) (sin.f64 ky))
✓	cost-diff	0	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
✓	cost-diff	0	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
✓	cost-diff	0	(.f64 #s(literal -1/6 binary64) (.f64 th th))
✓	cost-diff	0	(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
✓	cost-diff	0	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
✓	cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
✓	cost-diff	0	(sin.f64 ky)
✓	cost-diff	0	(/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx)))
✓	cost-diff	0	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	cost-diff	1408	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))

Rules

1 532×	`lower-fma.f32`
1 524×	`lower-fma.f64`
752×	`lower-*.f32`
732×	`lower-*.f64`
420×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	70	530
0	117	502
1	174	502
2	257	496
3	403	474
4	541	474
5	611	474
6	739	474
7	895	474
8	1108	456
9	1397	456
10	1905	456
11	2230	456
12	2346	456
13	2356	456
14	2364	456
15	2370	456
0	2370	448

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize465.0ms (3.6%)

Memory

13.4MiB live, 559.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.5%	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
✓	accuracy	73.3%	(fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
✓	accuracy	73.3%	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	accuracy	48.9%	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
✓	accuracy	89.8%	(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
✓	accuracy	79.6%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
✓	accuracy	73.3%	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
✓	accuracy	42.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
✓	accuracy	99.9%	(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
✓	accuracy	99.6%	(.f64 #s(literal -1/6 binary64) (.f64 th th))
✓	accuracy	48.9%	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
✓	accuracy	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
✓	accuracy	99.8%	(/.f64 #s(literal 1 binary64) (sin.f64 ky))
✓	accuracy	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) (sin.f64 th))
✓	accuracy	99.7%	(/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx)))
✓	accuracy	99.6%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))

Samples

179.0ms	95×	2	valid
95.0ms	72×	1	valid
49.0ms	70×	0	valid
37.0ms	19×	3	valid

Compiler

Compiled 532 to 56 computations (89.5% saved)

Precisions

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

ival-cos: 60.0ms (20% of total)

ival-mult: 50.0ms (16.7% of total)

adjust: 48.0ms (16% of total)

ival-add: 38.0ms (12.7% of total)

ival-sin: 25.0ms (8.3% of total)

ival-hypot: 25.0ms (8.3% of total)

ival-div: 24.0ms (8% of total)

ival-sqrt: 12.0ms (4% of total)

ival-pow2: 9.0ms (3% of total)

const: 5.0ms (1.7% of total)

ival-sub: 3.0ms (1% of total)

exact: 1.0ms (0.3% of total)

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

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

series49.0ms (0.4%)

Memory

16.6MiB live, 51.1MiB allocated

Counts

27 → 564

Calls

Call 1

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

Outputs
#<alt ky>
#<alt (* ky (+ 1 (* -1/6 (pow ky 2))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (/ (* ky (sin th)) (sin kx))>
#<alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (sin th)>
#<alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))>
#<alt (+ (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)))))))))))>
#<alt (+ (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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* 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)))))))>
#<alt (* 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))))))))))>
#<alt (* 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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (/ ky (sin kx))>
#<alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))>
#<alt (+ 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))))))>
#<alt (+ 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))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt ky>
#<alt (* ky (+ 1 (* -1/6 (pow ky 2))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (/ (* ky (sin th)) (sin kx))>
#<alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (sin th)>
#<alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))>
#<alt (+ (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)))))))))))>
#<alt (+ (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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* 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)))))))>
#<alt (* 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))))))))))>
#<alt (* 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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* -1/6 (pow th 3))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* -1/6 (pow th 2))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (sin th)>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* th (sin ky))>
#<alt (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))>
#<alt (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))>
#<alt (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* ky (sin th))>
#<alt (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))>
#<alt (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))>
#<alt (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (* 1/2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))>
#<alt (+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (* 1/2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))>
#<alt (+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (/ 1 ky)>
#<alt (/ (+ 1 (* 1/6 (pow ky 2))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (/ 1 (sin ky))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (/ 1 ky)>
#<alt (/ (+ 1 (* 1/6 (pow ky 2))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (* 2 (pow kx 2))>
#<alt (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>

Calls

141 calls:

Time	Variable		Point	Expression
16.0ms	ky	@	-inf	(* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))))
7.0ms	th	@	inf	(+ (* th (* -1/6 (* th th))) th)
1.0ms	th	@	inf	(* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))))
1.0ms	ky	@	inf	(* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))))
1.0ms	th	@	0	(* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))))

simplify471.0ms (3.6%)

Memory

-5.1MiB live, 737.3MiB allocated

Algorithm

1×	egg-herbie

Rules

7 338×	`lower-fma.f64`
7 338×	`lower-fma.f32`
6 826×	`lower-*.f64`
6 826×	`lower-*.f32`
5 486×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	740	15395
1	2431	14772
2	6067	14678
0	8746	13748

Stop Event

1×	iter limit
1×	node limit

Counts

564 → 559

Calls

Call 1

Inputs
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* 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))))
(* 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))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (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)))))))))))
(+ (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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* 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)))))))
(* 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))))))))))
(* 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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* 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))))
(* 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))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 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))))))
(+ 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))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* 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))))
(* 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))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (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)))))))))))
(+ (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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* 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)))))))
(* 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))))))))))
(* 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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* -1/6 (pow th 2))))
(* -1/6 (pow th 3))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* -1/6 (pow th 3))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* -1/6 (pow th 2))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(sin th)
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* th (sin ky))
(* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* ky (sin th))
(* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(* 1/2 (- 1 (cos (* 2 kx))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(* 1/2 (- 1 (cos (* 2 kx))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(/ 1 ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(/ 1 ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(* 2 (pow kx 2))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))

Outputs
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(/ (* ky (sin th)) (sin kx))
(/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (*.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))))))) (fma.f64 (.f64 (.f64 (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))))) #s(literal -1/12 binary64) (.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/5040 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (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)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (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))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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 ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th))
(* 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)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* 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))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/ ky (sin kx))
(/.f64 ky (sin.f64 kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.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 (sin.f64 kx)))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.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 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (+.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 #s(literal 1 binary64) (sin.f64 kx))))
(* 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))))
(fma.f64 ky (.f64 (.f64 ky ky) (+.f64 (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (+.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/5040 binary64) (sin.f64 kx))) (/.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (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/6 binary64) (sin.f64 kx))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 ky (sin.f64 kx)))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(fma.f64 (*.f64 kx kx) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 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))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.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))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 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))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.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)))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(/ (* ky (sin th)) (sin kx))
(/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (*.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))))))) (fma.f64 (.f64 (.f64 (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))))) #s(literal -1/12 binary64) (.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/5040 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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 (/.f64 (sin.f64 th) (sin.f64 kx)) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (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)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (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))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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 ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th))
(* 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)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* 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))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th))) (neg.f64 (.f64 th (.f64 th th))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th))) (neg.f64 (.f64 th (.f64 th th))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th))) (neg.f64 (.f64 th (.f64 th th))))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* -1/6 (pow th 2))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (.f64 kx kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/60 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sin th)
(sin.f64 th)
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))
(+.f64 (sin.f64 th) #s(literal 0 binary64))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))
(+.f64 (sin.f64 th) #s(literal 0 binary64))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))
(+.f64 (sin.f64 th) #s(literal 0 binary64))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))
(.f64 th (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 th th) #s(literal 1 binary64)) (sin.f64 ky)))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64))) (sin.f64 ky)))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64))) (.f64 #s(literal -1/6 binary64) (sin.f64 ky))) (sin.f64 ky)))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* ky (sin th))
(*.f64 ky (sin.f64 th))
(* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))
(.f64 ky (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (sin.f64 th)))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 th)))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 #s(literal -1/6 binary64) (sin.f64 th))) (sin.f64 th)))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (- 1 (cos (* 2 kx))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 ky ky))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 ky ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (.f64 kx kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/60 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (- 1 (cos (* 2 kx))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 ky ky))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 ky ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (.f64 kx kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -1/60 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (sin.f64 ky) (.f64 kx kx))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (.f64 kx kx)) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (/.f64 #s(literal -1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/5040 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(/ 1 ky)
(/.f64 #s(literal 1 binary64) ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 7/360 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 31/15120 binary64) #s(literal 7/360 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(/ 1 ky)
(/.f64 #s(literal 1 binary64) ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 7/360 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 31/15120 binary64) #s(literal 7/360 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(* 2 (pow kx 2))
(.f64 #s(literal 2 binary64) (.f64 kx kx))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 ky ky)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal -3/8 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 ky ky)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 16 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))

rewrite206.0ms (1.6%)

Memory

23.3MiB live, 272.6MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

1 064×	`lower-fma.f32`
1 056×	`lower-fma.f64`
1 048×	`lower-*.f32`
1 028×	`lower-*.f64`
852×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	70	376
0	117	353
1	397	298
0	2482	294

Stop Event

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

Counts

27 → 453

Calls

Call 1

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

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

eval504.0ms (3.9%)

Memory: -151.5MiB live, 405.0MiB allocated
Compiler: Compiled 38 654 to 2 585 computations (93.3% saved)

prune235.0ms (1.8%)

Memory

9.3MiB live, 570.0MiB allocated

Pruning

79 alts after pruning (75 fresh and 4 done)

	Pruned	Kept	Total
New	1 185	43	1 228
Fresh	13	32	45
Picked	3	2	5
Done	0	2	2
Total	1 201	79	1 280

Accuracy

100.0%

Counts

1 280 → 79

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.9%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	77.4%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
	77.5%	(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)))
	77.1%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 (sin.f64 ky) (sin.f64 th))))
	77.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky))
	73.1%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (sin.f64 ky))) #s(literal 4 binary64)) (sin.f64 kx))) (sin.f64 th))
	48.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	48.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	55.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
	47.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	27.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	32.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	45.7%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
✓	77.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	41.1%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
▶	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	77.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (*.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
	15.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	15.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	15.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	38.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) -1/2) 1/2) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	19.0%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	19.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	18.8%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	19.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
▶	86.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	41.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	33.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	32.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	33.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	30.7%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	18.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	14.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	51.5%	(.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (/.f64 (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
▶	33.7%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	17.4%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	77.4%	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.3%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.6%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (*.f64 th (sin.f64 ky))))
	29.3%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (*.f64 ky (sin.f64 th))))
	37.7%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	30.5%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	51.5%	(.f64 (sqrt.f64 (sin.f64 ky)) (.f64 (sqrt.f64 (sin.f64 ky)) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	33.6%	(.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	12.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
	77.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th)))
	22.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (.f64 kx kx) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
	29.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	28.7%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	28.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
✓	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)))
✓	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th)) (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (+.f64 (.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64)))) th)))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
	14.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	7.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th)))))))
▶	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))
	28.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
	30.5%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
	30.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (sin.f64 th)))
	30.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (sin.f64 th)) (sin.f64 ky)))
	30.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
	30.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	14.0%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
	21.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky))))
	21.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))) (/.f64 #s(literal 1 binary64) ky))))
	14.0%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
▶	14.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	3.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 ky (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))

Compiler

Compiled 3 902 to 2 503 computations (35.9% saved)

simplify325.0ms (2.5%)

Memory

20.0MiB live, 214.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	128	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))
✓	cost-diff	384	(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
✓	cost-diff	1408	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
✓	cost-diff	0	#s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
✓	cost-diff	0	(sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))
✓	cost-diff	0	(.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
✓	cost-diff	0	(*.f64 (sin.f64 ky) th)
✓	cost-diff	0	#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) th))
✓	cost-diff	0	(.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
✓	cost-diff	0	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
✓	cost-diff	0	(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
✓	cost-diff	0	#s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))
✓	cost-diff	0	#s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))))
✓	cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))
✓	cost-diff	0	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
✓	cost-diff	128	(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
✓	cost-diff	128	(fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))

Rules

3 196×	`lower-fma.f32`
3 188×	`lower-fma.f64`
1 828×	`lower-*.f32`
1 796×	`lower-*.f64`
856×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	90	680
0	144	654
1	212	648
2	330	638
3	528	618
4	746	600
5	987	600
6	1514	600
7	1892	600
8	2230	600
9	2374	600
10	2482	600
11	2567	600
12	2625	600
13	2670	600
14	3030	600
15	4182	600
16	4597	600
17	4691	600
18	4900	600
19	5111	600
20	5148	600
21	5458	600
22	5591	600
23	5591	600
24	5597	600
0	5597	581

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize571.0ms (4.4%)

Memory

-0.8MiB live, 678.7MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
✓	accuracy	73.3%	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
✓	accuracy	48.9%	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
✓	accuracy	99.5%	(.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky))
✓	accuracy	95.0%	(sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))
✓	accuracy	75.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
✓	accuracy	47.6%	#s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
✓	accuracy	79.6%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
✓	accuracy	73.3%	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
✓	accuracy	49.4%	#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) th))
✓	accuracy	42.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
✓	accuracy	99.4%	(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
✓	accuracy	53.6%	#s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))
✓	accuracy	48.9%	#s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))))
✓	accuracy	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))
✓	accuracy	99.6%	(/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
✓	accuracy	99.5%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky))
✓	accuracy	95.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
✓	accuracy	73.3%	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))

Samples

192.0ms	96×	2	valid
106.0ms	63×	1	valid
72.0ms	70×	0	valid
65.0ms	27×	3	valid

Compiler

Compiled 568 to 71 computations (87.5% saved)

Precisions

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

ival-cos: 119.0ms (32.2% of total)

ival-mult: 70.0ms (19% of total)

ival-div: 45.0ms (12.2% of total)

ival-sin: 44.0ms (11.9% of total)

adjust: 36.0ms (9.8% of total)

ival-add: 18.0ms (4.9% of total)

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

ival-sub: 7.0ms (1.9% of total)

ival-pow2: 7.0ms (1.9% of total)

const: 5.0ms (1.4% of total)

exact: 1.0ms (0.3% of total)

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

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

series61.0ms (0.5%)

Memory

-17.3MiB live, 35.7MiB allocated

Counts

29 → 600

Calls

Call 1

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

Outputs
#<alt (* 1/2 (- 1 (cos (* 2 ky))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow kx 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (pow (sin kx) 2)>
#<alt (+ (pow ky 2) (pow (sin kx) 2))>
#<alt (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))>
#<alt (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))>
#<alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (* 1/2 (- 1 (cos (* 2 ky))))>
#<alt (* 1/2 (- 1 (cos (* 2 ky))))>
#<alt (* 1/2 (- 1 (cos (* 2 ky))))>
#<alt (* 1/2 (- 1 (cos (* 2 ky))))>
#<alt (* 1/2 (- 1 (cos (neg (* -2 ky)))))>
#<alt (* 1/2 (- 1 (cos (neg (* -2 ky)))))>
#<alt (* 1/2 (- 1 (cos (neg (* -2 ky)))))>
#<alt (* 1/2 (- 1 (cos (neg (* -2 ky)))))>
#<alt (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (+ (* -2 (* (/ (* (pow kx 2) (* (sin ky) (sin th))) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))>
#<alt (+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))>
#<alt (+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (/ (* ky (sin th)) (sin kx))>
#<alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (+ (* -2 (* (/ (* (pow kx 2) (sin ky)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))>
#<alt (+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))>
#<alt (+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (/ ky (sin kx))>
#<alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))>
#<alt (/ (* ky (sin th)) (sin kx))>
#<alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))>
#<alt (* 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))))>
#<alt (* 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))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (sin th)>
#<alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))>
#<alt (+ (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)))))))))))>
#<alt (+ (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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* 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)))))))>
#<alt (* 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))))))))))>
#<alt (* 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))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* -1/6 (pow th 3))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* -1/6 (pow th 3))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (sin th)>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))>
#<alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))>
#<alt (* th (sin ky))>
#<alt (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))>
#<alt (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))>
#<alt (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* ky (sin th))>
#<alt (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))>
#<alt (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))>
#<alt (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* (sin ky) (sin th))>
#<alt (* ky th)>
#<alt (* ky (+ th (* -1/6 (* (pow ky 2) th))))>
#<alt (* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* 1/120 (* (pow ky 2) th))))))>
#<alt (* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) th)) (* 1/120 th)))))))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* th (sin ky))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))>
#<alt (+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))>
#<alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))>
#<alt (* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))>
#<alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))>
#<alt (+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt ky>
#<alt (* ky (+ 1 (* -1/6 (pow ky 2))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))>
#<alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (sin ky)>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))>
#<alt (* 1/2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))>
#<alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))>
#<alt (+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))>
#<alt (/ 2 (- 1 (cos (* 2 kx))))>
#<alt (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* 2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))>
#<alt (* 2 (pow ky 2))>
#<alt (* (pow ky 2) (+ 2 (* -2/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3))))>
#<alt (* (pow ky 2) (+ 2 (* (pow ky 2) (- (* (pow ky 2) (+ 4/45 (* -2/315 (pow ky 2)))) 2/3))))>
#<alt (- 1 (cos (* 2 ky)))>
#<alt (- 1 (cos (* 2 ky)))>
#<alt (- 1 (cos (* 2 ky)))>
#<alt (- 1 (cos (* 2 ky)))>
#<alt (- 1 (cos (neg (* -2 ky))))>
#<alt (- 1 (cos (neg (* -2 ky))))>
#<alt (- 1 (cos (neg (* -2 ky))))>
#<alt (- 1 (cos (neg (* -2 ky))))>
#<alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (+ (* -2 (* (/ (pow kx 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (/ 1 (sin kx))>
#<alt (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))>
#<alt (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))>
#<alt (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))>
#<alt (/ 2 (- 1 (cos (* 2 ky))))>
#<alt (+ (* -4 (/ (pow kx 2) (pow (- 1 (cos (* 2 ky))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (pow (sin kx) 2))>
#<alt (+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2)))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))>
#<alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))>
#<alt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))>
#<alt (pow ky 2)>
#<alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))>
#<alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (+ 1/2 (* -1/2 (cos (* -2 ky))))>
#<alt (/ 1 ky)>
#<alt (/ (+ 1 (* 1/6 (pow ky 2))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)>
#<alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))>
#<alt (* 2 (pow kx 2))>
#<alt (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt (- 1 (cos (* -2 kx)))>
#<alt th>
#<alt (* th (+ 1 (* -1/6 (pow th 2))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))>
#<alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (sin th)>
#<alt (* 2 (pow kx 2))>
#<alt (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))>
#<alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (* 2 kx)))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (- 1 (cos (neg (* -2 kx))))>
#<alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))>
#<alt (+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))>
#<alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))>
#<alt (+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))>
#<alt (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>
#<alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))>

Calls

150 calls:

Time	Variable		Point	Expression
26.0ms	th	@	-inf	(* -1/6 (* th (* th th)))
2.0ms	kx	@	0	(* (* (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (sin th))
1.0ms	ky	@	-inf	(* (* (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (sin th))
1.0ms	kx	@	inf	(* (* (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (sin th))
1.0ms	kx	@	-inf	(* (* (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (sin th))

simplify681.0ms (5.2%)

Memory

14.3MiB live, 641.1MiB allocated

Algorithm

1×	egg-herbie

Rules

8 656×	`lower-fma.f64`
8 656×	`lower-fma.f32`
6 768×	`lower-*.f64`
6 768×	`lower-*.f32`
6 578×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	956	15689
1	3145	15051
2	7848	15051
0	8006	14109

Stop Event

1×	iter limit
1×	node limit

Counts

600 → 596

Calls

Call 1

Inputs
(* 1/2 (- 1 (cos (* 2 ky))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow kx 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(pow (sin kx) 2)
(+ (pow ky 2) (pow (sin kx) 2))
(+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))
(+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(* 1/2 (- 1 (cos (* 2 ky))))
(* 1/2 (- 1 (cos (* 2 ky))))
(* 1/2 (- 1 (cos (* 2 ky))))
(* 1/2 (- 1 (cos (* 2 ky))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(+ (* -2 (* (/ (* (pow kx 2) (* (sin ky) (sin th))) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* 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))))
(* 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))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(+ (* -2 (* (/ (* (pow kx 2) (sin ky)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* 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))))
(* 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))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* 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))))
(* 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))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (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)))))))))))
(+ (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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* 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)))))))
(* 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))))))))))
(* 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))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* -1/6 (pow th 2))))
(* -1/6 (pow th 3))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(* -1/6 (pow th 3))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* -1/6 (pow th 3))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(sin th)
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(* th (sin ky))
(* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* ky (sin th))
(* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* (sin ky) (sin th))
(* ky th)
(* ky (+ th (* -1/6 (* (pow ky 2) th))))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* 1/120 (* (pow ky 2) th))))))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) th)) (* 1/120 th)))))))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* th (sin ky))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(* 1/2 (- 1 (cos (* 2 kx))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(* 2 (pow ky 2))
(* (pow ky 2) (+ 2 (* -2/3 (pow ky 2))))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3))))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* (pow ky 2) (+ 4/45 (* -2/315 (pow ky 2)))) 2/3))))
(- 1 (cos (* 2 ky)))
(- 1 (cos (* 2 ky)))
(- 1 (cos (* 2 ky)))
(- 1 (cos (* 2 ky)))
(- 1 (cos (neg (* -2 ky))))
(- 1 (cos (neg (* -2 ky))))
(- 1 (cos (neg (* -2 ky))))
(- 1 (cos (neg (* -2 ky))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(+ (* -2 (* (/ (pow kx 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(/ 1 (sin kx))
(+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))
(+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(/ 2 (- 1 (cos (* 2 ky))))
(+ (* -4 (/ (pow kx 2) (pow (- 1 (cos (* 2 ky))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (pow (sin kx) 2))
(+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2)))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(/ 1 ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(* 2 (pow kx 2))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
(- 1 (cos (* -2 kx)))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(* 2 (pow kx 2))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))

Outputs
(* 1/2 (- 1 (cos (* 2 ky))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow kx 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (.f64 kx kx))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(+ (pow ky 2) (pow (sin kx) 2))
(fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))
(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)))
(+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (*.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* 1/2 (- 1 (cos (* 2 ky))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (* 2 ky))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (* 2 ky))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (* 2 ky))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* 1/2 (- 1 (cos (neg (* -2 ky)))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))
(* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (* (pow kx 2) (* (sin ky) (sin th))) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))))
(+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))
(+ (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (* (sin ky) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))))) (/.f64 (.f64 kx kx) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/ (* ky (sin th)) (sin kx))
(/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.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))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))))) (fma.f64 (.f64 (.f64 (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))))) #s(literal -1/12 binary64) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/5040 binary64) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (sin.f64 ky) th))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))) (.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -2 (* (/ (* (pow kx 2) (sin ky)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 ky)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (* (sin ky) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin ky) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (sin ky) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (* (sin ky) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 ky)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (*.f64 (sin.f64 ky) (sqrt.f64 #s(literal 2 binary64)))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/ ky (sin kx))
(/.f64 ky (sin.f64 kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (neg.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))))) (/.f64 ky (sin.f64 kx)))
(* 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))))
(fma.f64 ky (.f64 (.f64 ky ky) (-.f64 (.f64 (.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 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (+.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 (sin.f64 kx)))
(* 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))))
(fma.f64 ky (.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/12 binary64) (.f64 (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))))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.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))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))))) (neg.f64 (+.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))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (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 (/.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 (sin.f64 kx)))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/ (* ky (sin th)) (sin kx))
(/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* 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))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (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))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.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))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))))) (fma.f64 (.f64 (.f64 (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))))) #s(literal -1/12 binary64) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/5040 binary64) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(+ (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)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (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))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.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 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.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))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* 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))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))) (.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th))))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(neg.f64 (.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(neg.f64 (.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(neg.f64 (.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (sin.f64 th)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) #s(literal -1/60 binary64) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))) (.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sin th)
(sin.f64 th)
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th)))))
(fma.f64 (*.f64 ky ky) #s(literal 0 binary64) (sin.f64 th))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (* 7/360 (sin th)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 0 binary64) #s(literal 0 binary64)) (sin.f64 th))
(+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (+ (* 1/6 (sin th)) (* (pow ky 2) (+ (* -1/36 (sin th)) (+ (* 1/120 (sin th)) (+ (* 7/360 (sin th)) (* (pow ky 2) (+ (* -7/2160 (sin th)) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 31/15120 (sin th))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 #s(literal 0 binary64) (.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) #s(literal -7/2160 binary64) (*.f64 (sin.f64 th) #s(literal 7/2160 binary64))))) #s(literal 0 binary64)) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))
(.f64 th (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 th th) #s(literal 1 binary64)) (sin.f64 ky)))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64))) (sin.f64 ky)))
(* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64))) (.f64 (sin.f64 ky) #s(literal -1/6 binary64))) (sin.f64 ky)))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* ky (sin th))
(*.f64 ky (sin.f64 th))
(* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))
(.f64 ky (.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (sin.f64 th)))
(* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 (sin.f64 th) #s(literal -1/6 binary64))) (sin.f64 th)))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* (sin ky) (sin th))
(*.f64 (sin.f64 ky) (sin.f64 th))
(* ky th)
(*.f64 ky th)
(* ky (+ th (* -1/6 (* (pow ky 2) th))))
(.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 ky ky) th) th))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* 1/120 (* (pow ky 2) th))))))
(.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) th)) (* 1/120 th)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 th #s(literal -1/6 binary64))) th))
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (sin.f64 th)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) #s(literal -1/60 binary64) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #s(literal 1 binary64)) (sin.f64 ky))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #s(literal -1/6 binary64)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 (sin.f64 ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)))) (.f64 (.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/60 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (.f64 ky ky) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 ky ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) ky)
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(sin ky)
(sin.f64 ky)
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) (fma.f64 kx kx #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(* 1/2 (- 1 (cos (* 2 kx))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 ky ky))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (.f64 ky ky) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (*.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (.f64 ky ky) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 ky ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(* 2 (pow ky 2))
(.f64 #s(literal 2 binary64) (.f64 ky ky))
(* (pow ky 2) (+ 2 (* -2/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* (pow ky 2) (+ 4/45 (* -2/315 (pow ky 2)))) 2/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow kx 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 (.f64 kx kx) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 ky)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 ky))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 ky)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 (.f64 kx kx) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/ 1 (sin kx))
(/.f64 #s(literal 1 binary64) (sin.f64 kx))
(+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (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/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.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))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (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/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/ 2 (- 1 (cos (* 2 ky))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))
(+ (* -4 (/ (pow kx 2) (pow (- 1 (cos (* 2 ky))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (.f64 kx kx) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))) (- 1 (cos (* 2 ky))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 ky))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 ky))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 kx kx)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (pow (sin kx) 2))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2)))
(-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (fma.f64 (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64))) (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))) (neg.f64 (*.f64 ky ky)) (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/ 1 ky)
(/.f64 #s(literal 1 binary64) ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 7/360 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 31/15120 binary64) #s(literal 7/360 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(* 2 (pow kx 2))
(.f64 #s(literal 2 binary64) (.f64 kx kx))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* -2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(* 2 (pow kx 2))
(.f64 #s(literal 2 binary64) (.f64 kx kx))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))

rewrite188.0ms (1.4%)

Memory

12.7MiB live, 243.6MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

1 184×	`lower-fma.f32`
1 176×	`lower-fma.f64`
1 118×	`lower-*.f32`
1 090×	`lower-*.f64`
952×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	490
0	139	471
1	437	416
0	2903	407

Stop Event

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

Counts

29 → 387

Calls

Call 1

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

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

eval149.0ms (1.2%)

Memory: -6.6MiB live, 338.2MiB allocated
Compiler: Compiled 33 614 to 2 648 computations (92.1% saved)

prune198.0ms (1.5%)

Memory

1.5MiB live, 414.4MiB allocated

Pruning

95 alts after pruning (87 fresh and 8 done)

	Pruned	Kept	Total
New	959	24	983
Fresh	7	63	70
Picked	1	4	5
Done	0	4	4
Total	967	95	1 062

Accuracy

100.0%

Counts

1 062 → 95

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.9%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	17.1%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	77.4%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
	77.5%	(/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)))
	77.1%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (.f64 (sin.f64 ky) (sin.f64 th))))
	77.5%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky))
	73.1%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (sin.f64 ky))) #s(literal 4 binary64)) (sin.f64 kx))) (sin.f64 th))
	48.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	48.8%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	55.4%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))
	17.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	77.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
	47.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	27.4%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	32.4%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	45.7%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
✓	77.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	41.1%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
✓	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	77.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
	37.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (*.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
	15.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ 1 (/ 1 (sin ky))) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	15.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ 1 (/ 1 (sin ky))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	15.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	38.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) -1/2) 1/2) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	19.0%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	19.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	18.8%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	19.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	41.4%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	33.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	32.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	33.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	18.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	14.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	42.9%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	51.5%	(.f64 (.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (/.f64 (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) (sin.f64 th))
	33.7%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 th)) (sin.f64 ky))
✓	33.7%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	19.1%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) #s(approx (- 1 (cos (* kx -2))) (.f64 #s(literal 2 binary64) (.f64 kx kx)))))) (sin.f64 ky)) (sin.f64 th))
	17.4%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	17.4%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	30.7%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	33.6%	(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
	32.3%	(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))) (sin.f64 ky)) (sin.f64 th))
	30.6%	(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))) (sin.f64 ky)) (sin.f64 th))
	77.4%	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.3%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	37.6%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (*.f64 th (sin.f64 ky))))
	37.7%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	30.5%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	51.5%	(.f64 (sqrt.f64 (sin.f64 ky)) (.f64 (sqrt.f64 (sin.f64 ky)) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
	12.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
	77.4%	(.f64 (neg.f64 (sin.f64 ky)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th)))
	29.3%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	28.7%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	28.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 th))))
✓	28.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
	14.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)))
✓	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th)) (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (+.f64 (.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64)))) th)))
	14.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (.f64 (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) th) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
	14.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	7.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th)))))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) th))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (*.f64 th #s(literal -1/6 binary64))))))
✓	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))
	28.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
	30.5%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
	14.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
	30.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (sin.f64 th)))
	30.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
	30.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	14.0%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
	21.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky))))
	21.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2))) (/.f64 #s(literal 1 binary64) ky))))
	14.0%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	14.2%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (/.f64 th (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	14.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
✓	14.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	8.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))))
	7.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))))))
	8.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky))))))
	13.9%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) #s(approx (sqrt (/ 1 (+ ( -1/2 (cos (* ky -2))) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky))))
	14.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) #s(approx (sqrt (/ 1 (+ ( -1/2 (cos (* ky -2))) 1/2))) (/.f64 #s(literal 1 binary64) ky))))
	3.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 ky (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	2.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) #s(approx (* (sin ky) th) (.f64 ky th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	42.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (sin.f64 ky) th)))

Compiler

Compiled 5 077 to 1 877 computations (63% saved)

regimes422.0ms (3.3%)

Memory

13.4MiB live, 691.0MiB allocated

Counts

129 → 1

Calls

Call 1

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

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

Calls

9 calls:

73.0ms	ky
55.0ms	th
50.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))
43.0ms	(sin.f64 kx)
42.0ms	(sin.f64 ky)

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes360.0ms (2.8%)

Memory

-22.0MiB live, 733.3MiB allocated

Counts

119 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

59.0ms	kx
41.0ms	(sin.f64 th)
36.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
35.0ms	th
35.0ms	(sin.f64 kx)

Results

Accuracy	Segments	Branch
99.6%	2	`kx`
94.6%	2	`ky`
88.9%	2	`th`
87.7%	5	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
99.3%	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)))))`
94.6%	3	`(sin.f64 ky)`
99.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.6%	3	`(sin.f64 kx)`
90.8%	4	`(sin.f64 th)`

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes69.0ms (0.5%)

Memory

31.9MiB live, 154.9MiB allocated

Counts

103 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

35.0ms	kx
28.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
99.6%	2	`kx`
99.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`

Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes299.0ms (2.3%)

Memory

-33.4MiB live, 610.9MiB allocated

Counts

102 → 5

Calls

Call 1

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

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

Calls

9 calls:

33.0ms	kx
33.0ms	ky
33.0ms	th
32.0ms	(sin.f64 th)
30.0ms	(sin.f64 ky)

Results

Accuracy	Segments	Branch
73.1%	4	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
77.3%	4	`(sin.f64 th)`
78.3%	4	`th`
76.1%	4	`(sin.f64 ky)`
74.1%	2	`ky`
87.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)))))`
79.5%	3	`(sin.f64 kx)`
79.5%	2	`kx`
79.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes32.0ms (0.2%)

Memory

22.3MiB live, 60.2MiB allocated

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

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

Calls

1 calls:

26.0ms

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

Results

Accuracy	Segments	Branch
84.7%	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 16 to 11 computations (31.3% saved)

regimes33.0ms (0.3%)

Memory

16.8MiB live, 52.2MiB allocated

Counts

91 → 5

Calls

Call 1

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

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

Calls

1 calls:

27.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes68.0ms (0.5%)

Memory

-28.6MiB live, 47.8MiB allocated

Counts

86 → 5

Calls

Call 1

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

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

Calls

1 calls:

23.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes53.0ms (0.4%)

Memory

5.3MiB live, 41.1MiB allocated

Counts

81 → 5

Calls

Call 1

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

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

Calls

1 calls:

22.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes31.0ms (0.2%)

Memory

37.2MiB live, 71.3MiB allocated

Counts

80 → 5

Calls

Call 1

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

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

Calls

1 calls:

26.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes133.0ms (1%)

Memory

6.4MiB live, 241.3MiB allocated

Counts

73 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
45.7%	1	`th`
63.4%	5	`(sin.f64 kx)`
63.2%	4	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
63.3%	4	`kx`
76.3%	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 36 to 27 computations (25% saved)

regimes120.0ms (0.9%)

Memory

-15.7MiB live, 280.9MiB allocated

Counts

71 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

27.0ms	ky
22.0ms	(sin.f64 th)
22.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))
21.0ms	(sin.f64 ky)
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
54.7%	5	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
70.1%	4	`(sin.f64 ky)`
69.9%	3	`ky`
40.7%	2	`(sin.f64 th)`
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 49 to 35 computations (28.6% saved)

regimes68.0ms (0.5%)

Memory

-17.1MiB live, 139.3MiB allocated

Counts

69 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

21.0ms	ky
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)))))

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)))))`
61.8%	4	`(sin.f64 ky)`
61.5%	3	`ky`

Compiler

Compiled 25 to 18 computations (28% saved)

regimes47.0ms (0.4%)

Memory

-5.5MiB live, 34.5MiB allocated

Counts

60 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

43.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 16 to 11 computations (31.3% saved)

regimes20.0ms (0.2%)

Memory

21.2MiB live, 21.2MiB allocated

Counts

58 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes37.0ms (0.3%)

Memory

-6.4MiB live, 31.2MiB allocated

Counts

57 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes34.0ms (0.3%)

Memory

-3.3MiB live, 34.7MiB allocated

Counts

56 → 3

Calls

Call 1

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

Outputs

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

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

30.0ms

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

Results

Accuracy	Segments	Branch
67.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 16 to 11 computations (31.3% saved)

regimes105.0ms (0.8%)

Memory

7.1MiB live, 201.4MiB allocated

Counts

54 → 3

Calls

Call 1

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

Outputs

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

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

6 calls:

19.0ms	kx
18.0ms	ky
18.0ms	(sin.f64 kx)
16.0ms	(sin.f64 ky)
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
53.4%	4	`(sin.f64 ky)`
58.4%	4	`(sin.f64 kx)`
47.8%	3	`ky`
55.7%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
55.7%	3	`kx`
58.9%	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 41 to 31 computations (24.4% saved)

regimes20.0ms (0.2%)

Memory

-22.9MiB live, 25.9MiB allocated

Counts

38 → 3

Calls

Call 1

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

Outputs

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

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

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
58.9%	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 16 to 11 computations (31.3% saved)

regimes14.0ms (0.1%)

Memory

23.7MiB live, 23.7MiB allocated

Counts

37 → 3

Calls

Call 1

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

Outputs

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

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

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
58.9%	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 16 to 11 computations (31.3% saved)

regimes13.0ms (0.1%)

Memory

-14.8MiB live, 22.8MiB allocated

Counts

33 → 3

Calls

Call 1

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

Outputs

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

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

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes22.0ms (0.2%)

Memory

0.3MiB live, 39.2MiB allocated

Counts

31 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 21 to 15 computations (28.6% saved)

regimes11.0ms (0.1%)

Memory

21.1MiB live, 21.1MiB allocated

Counts

30 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

9.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes28.0ms (0.2%)

Memory

-30.7MiB live, 50.6MiB allocated

Counts

26 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 27 to 20 computations (25.9% saved)

regimes8.0ms (0.1%)

Memory

19.0MiB live, 19.0MiB allocated

Counts

22 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

7.0ms

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

Results

Accuracy	Segments	Branch
50.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 16 to 11 computations (31.3% saved)

regimes67.0ms (0.5%)

Memory

16.9MiB live, 131.8MiB allocated

Counts

21 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
32.3%	3	`(sin.f64 th)`
31.0%	2	`(sin.f64 kx)`
31.9%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
32.4%	2	`kx`
32.5%	2	`ky`
32.3%	2	`th`
35.7%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
33.1%	2	`(sin.f64 ky)`
35.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 69 to 51 computations (26.1% saved)

regimes10.0ms (0.1%)

Memory

-25.2MiB live, 13.8MiB allocated

Counts

14 → 2

Calls

Call 1

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

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

Calls

1 calls:

9.0ms

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

Results

Accuracy	Segments	Branch
35.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 16 to 11 computations (31.3% saved)

regimes47.0ms (0.4%)

Memory

32.6MiB live, 107.3MiB allocated

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

Outputs

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

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

Calls

9 calls:

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

Results

Accuracy	Segments	Branch
17.7%	2	`(sin.f64 th)`
18.9%	3	`(sin.f64 kx)`
18.9%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
17.5%	2	`th`
18.9%	2	`kx`
19.4%	2	`ky`
19.2%	2	`(sin.f64 ky)`
21.8%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
21.0%	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 69 to 51 computations (26.1% saved)

regimes6.0ms (0%)

Memory

-28.2MiB live, 9.3MiB allocated

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

Outputs

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

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

Calls

1 calls:

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

Compiler

Compiled 19 to 13 computations (31.6% saved)

regimes3.0ms (0%)

Memory

7.1MiB live, 7.1MiB allocated

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

2.0ms

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

Results

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

Compiler

Compiled 19 to 13 computations (31.6% saved)

regimes24.0ms (0.2%)

Memory

7.6MiB live, 48.8MiB allocated

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

Outputs

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes15.0ms (0.1%)

Memory

-1.4MiB live, 36.1MiB allocated

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) #s(approx (+ (* th (* -1/6 (* th th))) th) (*.f64 #s(literal -1/6 binary64) (*.f64 th (*.f64 th th))))))

Outputs

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.3991292551710513e-8	0.004381965463268628

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.3991292551710513e-8	0.004381965463268628

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	0.19474665214833406	0.20176390865044225
0.0ms	-0.06779303685052604	-0.037556829301801826
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	0.19474665214833406	0.20176390865044225
0.0ms	-0.06779303685052604	-0.037556829301801826
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

3.5MiB live, 3.5MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	2.1822750188791087e-7	0.00012963054466692456
0.0ms	-0.037556829301801826	-0.005672748254863817
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

4.3MiB live, 4.3MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	2.1822750188791087e-7	0.00012963054466692456
0.0ms	-0.037556829301801826	-0.005672748254863817
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

3.3MiB live, 3.3MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	2.1822750188791087e-7	0.00012963054466692456
0.0ms	-0.037556829301801826	-0.005672748254863817
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

3.5MiB live, 3.6MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9091041042796811	0.914947690609656
0.0ms	2.1822750188791087e-7	0.00012963054466692456
0.0ms	-0.005672748254863817	5.629018259681915e-308
0.0ms	-1.0	-0.971180021746975

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.4MiB live, 2.4MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch37.0ms (0.3%)

Memory

-4.2MiB live, 67.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	0.8302299731944731	9.168846249973042
13.0ms	8.5074765654740055e-165	1.8749871361915278e-164

Samples

24.0ms

176×

valid

Compiler

Compiled 477 to 341 computations (28.5% saved)

Precisions

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

ival-sin: 12.0ms (62% of total)

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

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

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

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

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

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

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

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6961880578548197	0.7073307209112579
0.0ms	-0.7075905747053819	-0.7067776899269965

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6961880578548197	0.7073307209112579
0.0ms	-0.7075905747053819	-0.7067776899269965

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6961880578548197	0.7073307209112579
0.0ms	-0.7075905747053819	-0.7067776899269965

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6961880578548197	0.7073307209112579
0.0ms	-0.7075905747053819	-0.7067776899269965

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077
0.0ms	-0.005672748254863817	5.629018259681915e-308

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.00012963054466692456	0.023278791993743077

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.7141260357937735e-31	2.8556475163311098e-27

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch22.0ms (0.2%)

Memory

-34.9MiB live, 18.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
21.0ms	6.7141260357937735e-31	2.8556475163311098e-27

Samples

16.0ms

128×

valid

Compiler

Compiled 190 to 123 computations (35.3% saved)

Precisions

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

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

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

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

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

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.3602220522461946e-307	8.524937055983158e-307

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.3MiB live, 0.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.3602220522461946e-307	8.524937055983158e-307

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.3MiB live, 0.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.3602220522461946e-307	8.524937055983158e-307

Compiler

Compiled 22 to 19 computations (13.6% saved)

simplify39.0ms (0.3%)

Memory

14.2MiB live, 53.4MiB allocated

Algorithm

1×	egg-herbie

Rules

106×	`*-commutative_binary64`
18×	`+-commutative_binary64`
12×	`sub-neg_binary64`
6×	`neg-sub0_binary64`
6×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	295	3582
1	357	3582
2	366	3582
3	372	3582
4	375	3582

Stop Event

1×

saturated

Calls

Call 1

Inputs
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky 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 -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx 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 -3602879701896397/72057594037927936 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx 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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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/72057594037927936 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #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))))))
(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)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/1152921504606846976 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 th (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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 th (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/1152921504606846976 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 7378697629483821/36893488147419103232 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 6483618076376551/518689446110124119814050982961395143876555779030304612499457166211331601426613518299963381118387974286024735826412598647799393884426471913485859354264245460882647725425188690460672 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 7656119366529843/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 th)) (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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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 -6368089873101881/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (/.f64 th (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (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 7378697629483821/36893488147419103232 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 7378697629483821/36893488147419103232 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 7378697629483821/36893488147419103232 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (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 178405961588245/178405961588244985132285746181186892047843328 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) #s(approx (sqrt (/ 1 (+ ( -1/2 (cos (* ky -2))) 1/2))) (/.f64 #s(literal 1 binary64) 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 6690223559559187/44601490397061246283071436545296723011960832 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (*.f64 th #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))

Outputs
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3022314549036573/151115727451828646838272 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 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 -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx 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 -3602879701896397/72057594037927936 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx 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 -1 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) 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/72057594037927936 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) #s(approx (sin th) (.f64 th (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) 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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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/72057594037927936 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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/18014398509481984 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) #s(approx (sin th) (.f64 th (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64))))) #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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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/288230376151711744 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (/.f64 #s(literal 1 binary64) (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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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/288230376151711744 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))) #s(approx (sin th) (.f64 th (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64))))) #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 -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #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))))))
(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)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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/288230376151711744 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 944473296573929/2361183241434822606848 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(approx (sin th) (fma.f64 th (.f64 #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))))))
(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)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 -5764607523034235/1152921504606846976 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 th (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 944473296573929/2361183241434822606848 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 th (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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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/1152921504606846976 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 (sin.f64 ky) 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 944473296573929/2361183241434822606848 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 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 8196551321814303/9007199254740992 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (/ (sin th) (/ 1 (sin ky))) (.f64 (sin.f64 ky) 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/1152921504606846976 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 7378697629483821/36893488147419103232 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) #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/1152921504606846976 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 6483618076376551/518689446110124119814050982961395143876555779030304612499457166211331601426613518299963381118387974286024735826412598647799393884426471913485859354264245460882647725425188690460672 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 7656119366529843/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 6483618076376551/518689446110124119814050982961395143876555779030304612499457166211331601426613518299963381118387974286024735826412598647799393884426471913485859354264245460882647725425188690460672 binary64)) (.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx)))) (if (<=.f64 ky #s(literal 7656119366529843/9007199254740992 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky))))))) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))))
(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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 th)) (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 -6368089873101881/9007199254740992 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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 3152519739159347/4503599627370496 binary64)) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) #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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (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 -6368089873101881/9007199254740992 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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 3152519739159347/4503599627370496 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) #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 -6368089873101881/9007199254740992 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))) (sin.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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 -6368089873101881/9007199254740992 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))))))) (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 3152519739159347/4503599627370496 binary64)) (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (sin.f64 ky) (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 -6368089873101881/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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 -6368089873101881/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 3152519739159347/4503599627370496 binary64)) (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (sin.f64 ky) (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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64)))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (/.f64 th (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (/.f64 th (/.f64 #s(literal 1 binary64) (sin.f64 ky)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64)))))) #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/1152921504606846976 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th 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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) (.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64)))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) 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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64)))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) #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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) 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 7378697629483821/36893488147419103232 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 ky (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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (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 7378697629483821/36893488147419103232 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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) 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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #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)))) (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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (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 7378697629483821/36893488147419103232 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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (/.f64 #s(approx (* (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #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)))) (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 7378697629483821/36893488147419103232 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 7378697629483821/36893488147419103232 binary64)) (.f64 (sin.f64 th) #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)))) (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 7378697629483821/36893488147419103232 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (.f64 ky (sin.f64 th)) (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 178405961588245/178405961588244985132285746181186892047843328 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( (sin th) (sin ky)) (.f64 (sin.f64 ky) th)) #s(approx (sqrt (/ 1 (+ ( -1/2 (cos (* ky -2))) 1/2))) (/.f64 #s(literal 1 binary64) 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 6690223559559187/44601490397061246283071436545296723011960832 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th))))
(if (<=.f64 (.f64 (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)))))) #s(literal 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))))
(if (<=.f64 (.f64 (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)))))) #s(literal 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))))
(if (<=.f64 (.f64 (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)))))) #s(literal 5060056332682765/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 th (.f64 th #s(literal -1/6 binary64)) #s(literal 1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th th) (*.f64 th #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))

soundness1.8s (13.8%)

Memory

28.0MiB live, 1 720.7MiB allocated

Rules

14 278×	`lower-fma.f64`
14 278×	`lower-fma.f32`
8 656×	`lower-fma.f64`
8 656×	`lower-fma.f32`
7 338×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	490
0	139	471
1	437	416
0	2903	407
0	13	49
0	22	49
1	62	49
2	338	49
3	2902	49
0	8284	34
0	317	2263
1	1011	2214
2	3860	2122
3	7804	2122
0	8107	1974
0	956	15689
1	3145	15051
2	7848	15051
0	8006	14109
0	740	15395
1	2431	14772
2	6067	14678
0	8746	13748
0	70	376
0	117	353
1	397	298
0	2482	294
0	45	260
0	77	249
1	271	216
0	1936	216
0	731	12891
1	2407	12421
2	5994	12309
0	8794	11507

Stop Event

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

Compiler

Compiled 4 993 to 2 095 computations (58% saved)

preprocess232.0ms (1.8%)

Memory

-1.9MiB live, 360.0MiB allocated

Remove

(negabs ky)

(negabs th)

(abs kx)

Compiler

Compiled 4 814 to 642 computations (86.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated