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

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze296.0ms (2.2%)

Memory

6.7MiB live, 515.5MiB 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)

sample2.1s (15.3%)

Memory

27.0MiB live, 3 241.9MiB allocated

Samples

1.7s

8 256×

valid

Precisions

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

ival-sin: 999.0ms (66.7% of total)

ival-pow2: 211.0ms (14.1% of total)

ival-mult: 99.0ms (6.6% of total)

ival-sqrt: 79.0ms (5.3% of total)

ival-div: 54.0ms (3.6% of total)

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

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

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

Bogosity

explain191.0ms (1.4%)

Memory

-28.2MiB live, 355.6MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
14	-	1	(-2.591479872966604e-158 -1.7665617497698112e-294 2.731001914691138e+278)	`(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	13	0
↳	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`	underflow	54
↳	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`	underflow	60
↳	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`	underflow	13

Confusion

	Predicted +	Predicted -
+	13	1
-	0	242

Precision

1.0

Recall

0.9285714285714286

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	13	0	1
-	0	0	242

Precision?

1.0

Recall?

0.9285714285714286

Freqs

test

number	freq
0	243
1	13

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

78.0ms

512×

valid

Compiler

Compiled 155 to 43 computations (72.3% saved)

Precisions

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

ival-sin: 37.0ms (62.8% of total)

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

preprocess75.0ms (0.6%)

Memory

23.9MiB live, 73.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)

Compiler

Compiled 19 to 13 computations (31.6% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

2.2MiB live, 2.2MiB allocated

Alt Table

Click to see full alt table

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

Compiler

Compiled 19 to 13 computations (31.6% saved)

simplify8.0ms (0.1%)

Memory

-34.6MiB live, 11.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
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

36.4MiB live, 127.2MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.19140625	(/.f64 (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	0.228847509768442	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy	0.25228500976844204	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	3.2653351640170034	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))

Samples

42.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: 16.0ms (55.4% of total)

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

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

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

ival-mult: 2.0ms (6.9% 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)

series38.0ms (0.3%)

Memory

-41.4MiB live, 63.1MiB allocated

Counts

6 → 120

Calls

Call 1

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

Outputs
#s(alt (sin ky) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky)))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx)))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)) (patch (.f64 (/.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))) (taylor 0 kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt ky (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* -1/6 (pow ky 2)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())

Calls

30 calls:

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

simplify373.0ms (2.8%)

Memory

59.2MiB live, 511.4MiB 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 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)))) (/.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) (.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 ky (.f64 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 kx kx) (.f64 (pow.f64 (sin.f64 ky) #s(literal 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)))) #s(literal 1/2 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 kx (.f64 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))

rewrite258.0ms (1.9%)

Memory

-21.2MiB live, 371.4MiB allocated

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

eval57.0ms (0.4%)

Memory: 15.5MiB live, 115.4MiB allocated
Compiler: Compiled 12 851 to 1 673 computations (87% saved)

prune154.0ms (1.1%)

Memory

-21.9MiB live, 168.4MiB allocated

Pruning

23 alts after pruning (23 fresh and 0 done)

	Pruned	Kept	Total
New	425	23	448
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	426	23	449

Accuracy

100.0%

Counts

449 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.8%	(/.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)))))))
	64.6%	(*.f64 (/.f64 (pow.f64 (sqrt.f64 (sin.f64 ky)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	75.9%	(.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))
	75.6%	(.f64 (/.f64 (sin.f64 ky) (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))) (sin.f64 th))
▶	99.7%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	75.9%	(.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))
	48.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))
	49.8%	(.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))
	31.6%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 kx (.f64 kx (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (sin.f64 ky)))) (sin.f64 th))
	31.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	75.8%	(.f64 (.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))) (sin.f64 th))
	75.9%	(.f64 (.f64 (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))
	46.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))
	75.8%	(.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))))))))
	18.1%	(.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))
	27.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
▶	22.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th))
▶	18.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	93.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
	49.2%	#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)))
	23.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))
▶	25.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 1 024 to 680 computations (33.6% saved)

simplify247.0ms (1.8%)

Memory

5.3MiB live, 142.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

New	Metric	Score
cost-diff	0	(.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))))
cost-diff	0	#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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)))))
cost-diff	0	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th))
cost-diff	7104	(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)))
cost-diff	0	(/.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)))))))
cost-diff	0	(.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))
cost-diff	128	(+.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 #s(literal -1/2 binary64) (sin.f64 th))
cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
cost-diff	6400	(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))
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

2 728×	`lower-fma.f32`
2 722×	`lower-fma.f64`
2 156×	`lower-*.f32`
2 140×	`lower-*.f64`
924×	`times-frac`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	52	406
0	90	386
1	142	386
2	269	379
3	540	371
4	1029	371
5	1484	368
6	1800	368
7	2082	360
8	2317	360
9	2580	360
10	3038	360
11	3295	360
12	3413	360
13	3419	360
14	3419	360
15	3708	360
16	3752	360
17	4062	360
18	4144	360
19	4148	360
20	4150	360
21	4169	360
22	4175	360
23	4179	360
24	4184	360
25	4184	360
26	4184	360
0	4184	349

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

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

localize385.0ms (2.9%)

Memory

2.4MiB live, 501.4MiB allocated

Localize:

Found 18 expressions of interest:

New	Metric	Score
accuracy	0.34765625	(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
accuracy	2.057874749891114	(.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))))
accuracy	7.018613578611025	(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)))
accuracy	47.68937718282438	#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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)))))
accuracy	0.23046875	(.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))
accuracy	3.2653351640170034	(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))))))
accuracy	14.58106466678807	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
accuracy	16.277799130182228	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy	0.228847509768442	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy	4.078840091360321	(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))
accuracy	7.3111107232768235	(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
accuracy	50.07418778606861	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
accuracy	0	(sin.f64 th)
accuracy	47.58148513955037	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
accuracy	0	(sin.f64 kx)
accuracy	0.03515625	(hypot.f64 (sin.f64 ky) (sin.f64 kx))
accuracy	0.140625	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
accuracy	0.19140625	(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))

Samples

169.0ms	94×	2	valid
71.0ms	88×	1	valid
35.0ms	74×	0	valid

Compiler

Compiled 373 to 49 computations (86.9% saved)

Precisions

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

ival-cos: 85.0ms (36.6% of total)

ival-mult: 28.0ms (12.1% of total)

ival-sin: 26.0ms (11.2% of total)

ival-div: 23.0ms (9.9% of total)

adjust: 21.0ms (9% of total)

ival-add: 15.0ms (6.5% of total)

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

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

ival-sqrt: 6.0ms (2.6% of total)

ival-pow: 5.0ms (2.2% of total)

const: 4.0ms (1.7% of total)

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

exact: 1.0ms (0.4% of total)

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

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

series124.0ms (0.9%)

Memory

-27.2MiB live, 112.7MiB allocated

Counts

23 → 540

Calls

Call 1

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

Outputs
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt ky (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* -1/6 (pow ky 2)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx)))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky)))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6))))) (taylor 0 th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6))))) (taylor 0 th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6))))) (taylor 0 th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2))) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2)) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 th) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* 1/12 (pow th 2)) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* (pow th 2) (+ 1/12 (* -1/240 (pow th 2)))) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* (pow th 2) (+ 1/12 (* (pow th 2) (- (* 1/10080 (pow th 2)) 1/240)))) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2))) (taylor 0 kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))))) (taylor 0 kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))) (taylor 0 kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))) (taylor -inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))) (taylor -inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))) (taylor -inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))) (taylor -inf kx) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* 2 kx)))) (taylor 0 ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2)) (taylor 0 ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (taylor 0 ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (taylor 0 ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor -inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor -inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor -inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))) (taylor -inf ky) (#s(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))))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (patch (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))) (taylor 0 kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(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)))))))))))))))))))) (taylor 0 ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* th (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor 0 th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))) (taylor 0 th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* 1/120 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))))) (taylor 0 th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))) (taylor 0 th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (* (pow kx 2) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (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)))))))))) (taylor 0 kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (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 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)))))))))))) (taylor 0 kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (/ (* (pow ky 2) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (taylor 0 ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* (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/2 (* (/ (* (pow ky 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))))))))) (taylor 0 ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* (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))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 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/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))))))))))) (taylor 0 ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (/.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))))))) (patch (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin kx)) (taylor 0 ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor 0 ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor 0 ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor 0 ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (taylor inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (taylor -inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow ky 2) (pow kx 3))) (taylor 0 kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (* -5/12 (pow ky 2))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (+ (* -71/720 (pow ky 2)) (* (pow kx 2) (+ 7/360 (* -37/2016 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor -inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor -inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor -inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))) (taylor -inf kx) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) (patch (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (patch #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (taylor inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (taylor -inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow ky 3) (pow kx 3))) (taylor 0 kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (* ky (+ 1 (* -5/12 (pow ky 2)))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (* ky (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (+ (* ky (+ 1/6 (* -71/720 (pow ky 2)))) (* (pow kx 2) (* ky (+ 7/360 (* -37/2016 (pow ky 2)))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor -inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor -inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor -inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor -inf kx) (#s(alt (.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt kx (taylor 0 kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (* kx (+ 1 (* -1/6 (pow kx 2)))) (taylor 0 kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6)))) (taylor 0 kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6)))) (taylor 0 kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor -inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor -inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor -inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor -inf kx) (#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (pow kx 2)) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 kx)))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 kx)))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 kx)))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 kx)))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* 1/2 (* (pow kx 2) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))) (taylor 0 kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))) (taylor 0 kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (taylor 0 ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (/ (pow ky 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))) (taylor 0 ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))) (taylor 0 ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 kx) (taylor 0 kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/36 (pow kx 2)) 1/6) kx) (taylor 0 kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow kx 2) (- (* -7/2160 (pow kx 2)) 1/36)) 1/6) kx) (taylor 0 kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow kx 2) (- (* (pow kx 2) (- (* -31/90720 (pow kx 2)) 7/2160)) 1/36)) 1/6) kx) (taylor 0 kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor -inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor -inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor -inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ -1/6 (sin kx)) (taylor -inf kx) (#s(alt (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) (patch (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)) #<representation binary64>) () ())) ())

Calls

135 calls:

Time	Variable		Point	Expression
27.0ms	th	@	-inf	(+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th))
20.0ms	kx	@	inf	(+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))
9.0ms	ky	@	0	(* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky))
2.0ms	kx	@	-inf	(+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))
2.0ms	th	@	0	(* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky))

simplify346.0ms (2.6%)

Memory

22.5MiB live, 402.5MiB allocated

Algorithm

1×	egg-herbie

Rules

8 072×	`lower-fma.f64`
8 072×	`lower-fma.f32`
6 338×	`lower-*.f64`
6 338×	`lower-*.f32`
5 868×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	872	13031
1	2776	12543
2	6918	12467
0	8022	11755

Stop Event

1×	iter limit
1×	node limit

Counts

540 → 537

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)
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6)))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2)))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (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)))))
(* -1/2 th)
(* th (- (* 1/12 (pow th 2)) 1/2))
(* th (- (* (pow th 2) (+ 1/12 (* -1/240 (pow th 2)))) 1/2))
(* th (- (* (pow th 2) (+ 1/12 (* (pow th 2) (- (* 1/10080 (pow th 2)) 1/240)))) 1/2))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (sin th))
(* -1/2 (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))))))
(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)))))
(* (* 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) (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 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))
(* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* 1/120 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (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 th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (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 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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (* (pow ky 2) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (* (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/2 (* (/ (* (pow ky 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)))))))))
(+ (* (* (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))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 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/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)))))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(/ 1 (sin kx))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* -1/2 (/ (pow ky 2) (pow kx 3)))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (* -5/12 (pow ky 2))))) (pow kx 3))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (+ (* -71/720 (pow ky 2)) (* (pow kx 2) (+ 7/360 (* -37/2016 (pow ky 2))))))))))) (pow kx 3))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(/ (* 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 (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(* -1/2 (/ (pow ky 3) (pow kx 3)))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (* ky (+ 1 (* -5/12 (pow ky 2)))))) (pow kx 3))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (* ky (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (+ (* ky (+ 1/6 (* -71/720 (pow ky 2)))) (* (pow kx 2) (* ky (+ 7/360 (* -37/2016 (pow ky 2)))))))))) (pow kx 3))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
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 kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow ky 2))
(/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2))
(/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2))
(/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 2))
(/ (pow kx 2) (pow (sin ky) 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)
(* 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/2 (* -1/2 (cos (* 2 ky)))))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* 1/2 (* (pow kx 2) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))
(+ (* 1/2 (* (/ (pow ky 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))))
(+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))
(+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ -1/6 kx)
(/ (- (* -1/36 (pow kx 2)) 1/6) kx)
(/ (- (* (pow kx 2) (- (* -7/2160 (pow kx 2)) 1/36)) 1/6) kx)
(/ (- (* (pow kx 2) (- (* (pow kx 2) (- (* -31/90720 (pow kx 2)) 7/2160)) 1/36)) 1/6) kx)
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin kx))
(/ -1/6 (sin 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 #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 #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 #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 (.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 #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 (sin.f64 th) (.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 (.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 (sin.f64 th) #s(literal -1/2 binary64)) (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 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (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))))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (.f64 th th))))) (*.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))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (.f64 #s(literal 1/120 binary64) (sin.f64 ky)))) (.f64 (.f64 #s(literal -1/6 binary64) (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 (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) (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/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) (+.f64 (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 kx) (+.f64 (+.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 #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 #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/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 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (*.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))
(* (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 #s(literal 2/45 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (/.f64 (.f64 ky ky) (sin.f64 kx))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/6 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 (*.f64 kx kx) (+.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 (.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/6 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 #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 #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 #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 (.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 #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 (sin.f64 th) (.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 (.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 (sin.f64 th) #s(literal -1/2 binary64)) (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 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (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))))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (.f64 th th))))) (*.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))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (.f64 #s(literal 1/120 binary64) (sin.f64 ky)))) (.f64 (.f64 #s(literal -1/6 binary64) (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 (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)
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6)))))
(fma.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/6 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) th)
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6)))))
(fma.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/240 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/120 binary64)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/6 binary64))))) th)
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6)))))
(fma.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/10080 binary64) #s(literal -1/5040 binary64)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/120 binary64))) #s(literal -1/6 binary64))))) th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (*.f64 kx kx))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2))
(/.f64 (fma.f64 (.f64 ky ky) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th)) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th))) (*.f64 ky ky))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2))
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (sin.f64 th) (.f64 (.f64 kx kx) #s(literal -1/15 binary64))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th))) (.f64 ky ky))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2))
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (sin.f64 th) (.f64 (.f64 kx kx) #s(literal -1/15 binary64))) (.f64 (sin.f64 th) (.f64 (.f64 kx kx) #s(literal 11/945 binary64)))) (.f64 (sin.f64 th) (.f64 (.f64 kx kx) #s(literal -1/15 binary64))))) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th))) (*.f64 ky ky))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 (sin.f64 th) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (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 #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 #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 #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 (.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 #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 (sin.f64 th) (.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 (.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 (sin.f64 th) #s(literal -1/2 binary64)) (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 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (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))))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (.f64 th th))))) (*.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))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (.f64 #s(literal 1/120 binary64) (sin.f64 ky)))) (.f64 (.f64 #s(literal -1/6 binary64) (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 (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))))))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* th (- (* 1/12 (pow th 2)) 1/2))
(.f64 th (fma.f64 #s(literal 1/12 binary64) (.f64 th th) #s(literal -1/2 binary64)))
(* th (- (* (pow th 2) (+ 1/12 (* -1/240 (pow th 2)))) 1/2))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/240 binary64) (*.f64 th th) #s(literal 1/12 binary64)) #s(literal -1/2 binary64)))
(* th (- (* (pow th 2) (+ 1/12 (* (pow th 2) (- (* 1/10080 (pow th 2)) 1/240)))) 1/2))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) #s(literal 1/10080 binary64) #s(literal -1/240 binary64)) #s(literal 1/12 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #s(literal -1/2 binary64))
(* -1/2 (sin th))
(*.f64 (sin.f64 th) #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 (.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)))
(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))
(* (* 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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (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))))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (.f64 th th))))) (.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 (.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))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (.f64 #s(literal 1/120 binary64) (sin.f64 ky)))) (.f64 (.f64 #s(literal -1/6 binary64) (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 (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))))))
(* (* (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 (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 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.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))))))) (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 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 (.f64 kx kx) (sin.f64 ky)) (.f64 (sin.f64 th) (+.f64 (fma.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)))) (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/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 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 #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 (sin.f64 th) (.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 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))))))))))
(* 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 (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)))))) (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)))))) (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal -1/12 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 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (fma.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)))) (.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 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))
(.f64 th (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 th th) #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 kx #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 (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* 1/120 (* (pow th 2) (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))))) (fma.f64 #s(literal 1/120 binary64) (.f64 th th) #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 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
(* th (+ (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (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 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64))) (.f64 #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 #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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 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)))))
(+ (* -1/2 (* (* (pow kx 2) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (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 (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) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (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 (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 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.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)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.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))))))
(+ (* (sin th) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (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 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 th) (.f64 kx kx)) (+.f64 (fma.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)))) (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/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 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 #s(literal 1/2 binary64) (.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)))))))) (.f64 (.f64 (sin.f64 th) #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 (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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.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 kx #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 th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.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)))))))
(+ (* -2 (* (/ (* (pow ky 2) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 (sin.f64 th) (.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) (/.f64 (.f64 (sin.f64 th) (.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))))))
(+ (* (* (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/2 (* (/ (* (pow ky 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)))))))))
(fma.f64 (sin.f64 th) (.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 ky ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 (sin.f64 th) (.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 (.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))))))))
(+ (* (* (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))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 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/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)))))))))))
(fma.f64 (sin.f64 th) (.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 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 (sin.f64 th) (+.f64 (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)))))) (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)))))))) (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))))) (/.f64 (sin.f64 th) (sqrt.f64 #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))))))))
(* (sin th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 th) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.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 kx #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 (sin kx))
(/.f64 #s(literal 1 binary64) (sin.f64 kx))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(.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))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(.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))))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* (pow ky 2) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(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)))
(* -1/2 (/ (pow ky 2) (pow kx 3)))
(/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (* -5/12 (pow ky 2))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -5/12 (pow ky 2)) (* (pow kx 2) (+ 1/6 (+ (* -71/720 (pow ky 2)) (* (pow kx 2) (+ 7/360 (* -37/2016 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -37/2016 binary64) #s(literal 7/360 binary64)) #s(literal 1/6 binary64))) #s(literal 1 binary64))) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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)))
(+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))
(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 (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 #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 #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 #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 (.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 #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 (sin.f64 th) (.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 (.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 (sin.f64 th) #s(literal -1/2 binary64)) (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 (sin.f64 th) (/.f64 #s(literal -1/2 binary64) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (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))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (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))))) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (.f64 th th))))) (*.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))))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 ky) (.f64 th th)) (.f64 #s(literal 1/120 binary64) (sin.f64 ky)))) (.f64 (.f64 #s(literal -1/6 binary64) (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 (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) (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/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) (+.f64 (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 kx) (+.f64 (+.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 #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 #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/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 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (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 #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)))) (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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (*.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))
(* (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 (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 (+ (* -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 (+ (* -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)))
(* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(.f64 (.f64 ky (*.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))))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* (pow ky 3) (+ (* -1 (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (* (pow ky 2) (sin kx)))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* -1 (* (pow ky 3) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))
(.f64 (.f64 ky (*.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))))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* -1 (* (pow ky 3) (- (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))) (/ 1 (* (pow ky 2) (sin kx))))))
(.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 kx) (.f64 ky ky))) (+.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (.f64 ky (*.f64 ky ky)))
(* -1/2 (/ (pow ky 3) (pow kx 3)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (* ky (+ 1 (* -5/12 (pow ky 2)))))) (pow kx 3))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (* ky (+ 1/6 (* -71/720 (pow ky 2)))))))) (pow kx 3))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (pow ky 3)) (* (pow kx 2) (+ (* ky (+ 1 (* -5/12 (pow ky 2)))) (* (pow kx 2) (+ (* ky (+ 1/6 (* -71/720 (pow ky 2)))) (* (pow kx 2) (* ky (+ 7/360 (* -37/2016 (pow ky 2)))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 ky (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) (.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -37/2016 binary64) #s(literal 7/360 binary64))))))) (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)))) (.f64 kx (.f64 kx 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 (+ (* -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 (+ (* -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 (+ (* -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 (+ (* -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 (+ (* -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 (+ (* -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 (+ (* -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)))
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))))
(.f64 kx (fma.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)) #s(literal 1 binary64)))
(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 kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow ky 2))
(/.f64 (.f64 kx kx) (.f64 ky ky))
(/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2))
(/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))
(/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2))
(/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))
(/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2))
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/ (pow kx 2) (pow (sin ky) 2))
(/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #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 (*.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))
(* 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/2 (* -1/2 (cos (* 2 ky)))))
(sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* 1/2 (* (pow kx 2) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #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.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (.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)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (+.f64 #s(literal 1/3 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))))) #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))))
(+ (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (* (pow kx 2) (+ (* 1/2 (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (* 1/2 (* (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (/.f64 (fma.f64 #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))) #s(literal -1/6 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) (/.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))) #s(literal -1/6 binary64)))) (.f64 #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)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2) (sqrt (- 1 (cos (* 2 kx)))))
(.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* 1/2 (* (/ (pow ky 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))
(fma.f64 (.f64 ky ky) (.f64 (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 #s(literal 1/3 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (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 #s(literal 2/45 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) #s(literal -1/6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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/6 kx)
(/.f64 #s(literal -1/6 binary64) kx)
(/ (- (* -1/36 (pow kx 2)) 1/6) kx)
(/.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/36 binary64) #s(literal -1/6 binary64)) kx)
(/ (- (* (pow kx 2) (- (* -7/2160 (pow kx 2)) 1/36)) 1/6) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal -7/2160 binary64) #s(literal -1/36 binary64)) #s(literal -1/6 binary64)) kx)
(/ (- (* (pow kx 2) (- (* (pow kx 2) (- (* -31/90720 (pow kx 2)) 7/2160)) 1/36)) 1/6) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -31/90720 binary64) #s(literal -7/2160 binary64)) #s(literal -1/36 binary64)) #s(literal -1/6 binary64)) kx)
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))
(/ -1/6 (sin kx))
(/.f64 #s(literal -1/6 binary64) (sin.f64 kx))

rewrite124.0ms (0.9%)

Memory

24.6MiB live, 164.6MiB allocated

Rules

1 386×	`lower-*.f32`
1 370×	`lower-*.f64`
1 320×	`lower-fma.f32`
1 314×	`lower-fma.f64`
1 074×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	52	319
0	90	303
1	347	276
0	2883	269

Stop Event

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

Counts

23 → 325

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

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

eval163.0ms (1.2%)

Memory: -17.4MiB live, 250.7MiB allocated
Compiler: Compiled 27 975 to 2 192 computations (92.2% saved)

prune201.0ms (1.5%)

Memory

0.5MiB live, 389.4MiB allocated

Pruning

47 alts after pruning (46 fresh and 1 done)

	Pruned	Kept	Total
New	989	35	1 024
Fresh	7	11	18
Picked	4	1	5
Done	0	0	0
Total	1 000	47	1 047

Accuracy

100.0%

Counts

1 047 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.8%	(/.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)))))))
	64.6%	(*.f64 (/.f64 (pow.f64 (sqrt.f64 (sin.f64 ky)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	75.9%	(*.f64 (/.f64 (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 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
	38.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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
	85.4%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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))
	40.6%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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))
	28.2%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #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))
	33.1%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
	33.0%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
	75.6%	(.f64 (/.f64 (sin.f64 ky) (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))) (sin.f64 th))
▶	52.9%	(.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)))
	54.6%	(.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))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	75.9%	(.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))
	31.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	39.6%	(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
	75.8%	(.f64 (.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))) (sin.f64 th))
	75.9%	(.f64 (.f64 (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))
	75.8%	(.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))))))))
	33.1%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
	28.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 ky))
	40.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
	27.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	9.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	12.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	10.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	27.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	10.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
	8.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
	27.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))))
▶	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
	40.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
	21.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
	11.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
	12.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
	16.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th)))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
▶	93.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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)))))))
	49.2%	#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)))
✓	25.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
▶	11.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
	3.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
	15.8%	#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)))
▶	15.8%	#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)))

Compiler

Compiled 2 234 to 1 388 computations (37.9% saved)

simplify208.0ms (1.5%)

Memory

-2.2MiB live, 137.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
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))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
cost-diff	0	(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
cost-diff	0	(fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)
cost-diff	0	#s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))
cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
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 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) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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)))))))

Rules

1 816×	`lower-*.f32`
1 798×	`lower-*.f64`
1 676×	`lower-fma.f32`
1 670×	`lower-fma.f64`
1 068×	`times-frac`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	458
0	102	443
1	160	443
2	276	433
3	520	431
4	918	431
5	1086	431
6	1323	431
7	1532	431
8	1784	431
9	2075	431
10	2550	431
11	2810	431
12	2929	431
13	2937	431
14	2937	431
15	3157	431
16	3177	431
17	3709	431
18	3709	431
19	3714	431
20	3716	431
21	3728	431
22	3728	431
23	3768	431
24	3785	431
25	3786	431
26	3786	431
0	3786	422

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

localize409.0ms (3%)

Memory

1.8MiB live, 538.0MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.140625	(.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)))
accuracy	0.18359375	(.f64 #s(literal -1/6 binary64) (.f64 th th))
accuracy	0.19140625	(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
accuracy	30.110620776885888	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
accuracy	7.04621518186754	(.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	14.491885019849864	(sqrt.f64 (/.f64 #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	16.277799130182228	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	37.08886782930642	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
accuracy	4.047590091360321	(fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)
accuracy	7.390617905499543	(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
accuracy	22.552936815637658	#s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))
accuracy	50.07418778606861	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
accuracy	0.03125	(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
accuracy	0.18359375	(.f64 #s(literal -1/6 binary64) (.f64 th th))
accuracy	30.110620776885888	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
accuracy	47.58148513955037	#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	0.25	(/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
accuracy	0.25228500976844204	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	2.29666874435464	(.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))))))
accuracy	3.401236456797597	(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)))))

Samples

193.0ms	73×	2	valid
74.0ms	128×	0	valid
35.0ms	39×	1	valid
31.0ms	16×	3	valid

Compiler

Compiled 368 to 59 computations (84% saved)

Precisions

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

ival-cos: 114.0ms (39.6% of total)

ival-mult: 66.0ms (23% of total)

ival-sin: 23.0ms (8% of total)

adjust: 19.0ms (6.6% of total)

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

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

ival-sqrt: 11.0ms (3.8% of total)

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

const: 5.0ms (1.7% of total)

ival-hypot: 5.0ms (1.7% of total)

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

exact: 1.0ms (0.3% of total)

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

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

series51.0ms (0.4%)

Memory

33.4MiB live, 77.2MiB allocated

Counts

23 → 552

Calls

Call 1

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

Outputs
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor 0 th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky))))) (taylor 0 th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky))))))) (taylor 0 th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(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)))))))) (taylor 0 th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf th) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (sin th)) (taylor 0 ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th))))) (taylor 0 ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th))))))) (taylor 0 ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(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)))))))) (taylor 0 ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sin th)) (taylor -inf ky) (#s(alt (.f64 (sin.f64 th) (sin.f64 ky)) (patch (.f64 (sin.f64 th) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))) (taylor 0 th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt (sin.f64 th) (patch (sin.f64 th) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))) (taylor 0 th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))) (taylor 0 th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) (patch #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) (patch (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 2)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th th)) (patch (.f64 #s(literal -1/6 binary64) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2))) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) (patch #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1))) (taylor -inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1))) (taylor -inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1))) (taylor -inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1))) (taylor -inf th) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (* -1/6 (* (pow kx 2) th))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) th)) (+ (* 2/135 (* (pow kx 2) th)) (* 1/3 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) (patch (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow ky 2))) (taylor 0 ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow kx 2)) (* -1/6 (* (pow kx 2) (pow ky 2)))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) (patch #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor 0 th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(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))))))))) (taylor 0 th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf th) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/6 (sin th))))) (taylor 0 ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(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))))))))) (taylor 0 ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor -inf ky) (#s(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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (patch (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt ky (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* -1/6 (pow ky 2)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6)))) (taylor 0 ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (sin.f64 ky) (patch (sin.f64 ky) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx)))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky)))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (patch (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor 0 kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky))) (taylor 0 kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky))) (taylor 0 kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky))) (taylor 0 kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf kx) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin kx)) (taylor 0 ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx))) (taylor 0 ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(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))) (taylor 0 ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(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))) (taylor 0 ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3)))) (taylor 0 kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor -inf kx) (#s(alt (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (pow (sin ky) 2)) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (pow kx 2) (pow (sin ky) 4))) (/ 1 (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (pow (sin kx) 2)) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(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))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 ky) (taylor 0 ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* 1/6 (pow ky 2))) ky) (taylor 0 ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky) (taylor 0 ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky) (taylor 0 ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor -inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor -inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor -inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor -inf ky) (#s(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)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())

Calls

138 calls:

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

simplify353.0ms (2.6%)

Memory

15.7MiB live, 477.4MiB allocated

Algorithm

1×	egg-herbie

Rules

8 166×	`lower-fma.f64`
8 166×	`lower-fma.f32`
6 254×	`lower-*.f64`
6 254×	`lower-*.f32`
5 996×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	836	12148
1	2737	11708
2	6971	11605
0	8077	11045

Stop Event

1×	iter limit
1×	node limit

Counts

552 → 547

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)))))
(* (* 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 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))
(* 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)
(/ (* 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))
(/ (* 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 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6)))))
(* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6)))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2)))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
(* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1)))
(* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1)))
(* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1)))
(* -1 (* th (- (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))) 1)))
th
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2)))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* (pow kx 2) (+ (* -1/2 (/ th (pow (sin ky) 2))) (/ th (pow kx 2))))
(* -1/2 (/ (* (pow kx 2) th) (pow ky 2)))
(/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (* -1/6 (* (pow kx 2) th))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th))))))))) (pow ky 2))
(/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) th)) (+ (* 2/135 (* (pow kx 2) th)) (* 1/3 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))))) (pow ky 2))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(+ th (* -1/2 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow ky 2)))
(/ (+ (* -1/2 (pow kx 2)) (* -1/6 (* (pow kx 2) (pow ky 2)))) (pow ky 2))
(/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (pow ky 2))
(/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))
(* (* 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) (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)))))))
(* 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)))))))
(/ (* 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)))
(/ 1 (sin ky))
(+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))
(+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
(sqrt (/ 1 (+ (pow (sin kx) 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)
(/ 1 (pow (sin ky) 2))
(+ (* -1 (/ (pow kx 2) (pow (sin ky) 4))) (/ 1 (pow (sin ky) 2)))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 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))))))

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

rewrite112.0ms (0.8%)

Memory

-7.9MiB live, 137.7MiB allocated

Rules

1 306×	`lower-*.f32`
1 288×	`lower-*.f64`
1 280×	`lower-fma.f32`
1 274×	`lower-fma.f64`
1 018×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	348
0	102	314
1	371	301
0	2696	294

Stop Event

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

Counts

23 → 267

Calls

Call 1

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

eval156.0ms (1.2%)

Memory: -24.4MiB live, 197.2MiB allocated
Compiler: Compiled 25 066 to 1 615 computations (93.6% saved)

prune336.0ms (2.5%)

Memory

-12.0MiB live, 410.6MiB allocated

Pruning

71 alts after pruning (65 fresh and 6 done)

	Pruned	Kept	Total
New	960	32	992
Fresh	8	33	41
Picked	0	5	5
Done	0	1	1
Total	968	71	1 039

Accuracy

100.0%

Counts

1 039 → 71

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.8%	(/.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)))))))
	64.6%	(*.f64 (/.f64 (pow.f64 (sqrt.f64 (sin.f64 ky)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	75.9%	(*.f64 (/.f64 (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 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
	38.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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
▶	85.4%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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))
	28.2%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #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))
	33.1%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
	33.0%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
	75.6%	(.f64 (/.f64 (sin.f64 ky) (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))) (sin.f64 th))
✓	52.9%	(.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)))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	28.2%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	75.9%	(.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))
	31.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	18.8%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	39.6%	(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
	75.8%	(.f64 (.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))) (sin.f64 th))
	75.9%	(.f64 (.f64 (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))
	28.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 ky))
	40.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
	27.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	9.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	12.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	10.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	27.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	10.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
	8.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
	17.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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)))))
	28.2%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))
	27.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))))
	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
✓	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
	23.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
	23.8%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
▶	40.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
	14.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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))))))
	39.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))
	14.5%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
	21.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
▶	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
	12.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
✓	93.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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)))))))
	48.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
	40.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
	41.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
	31.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
	29.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
✓	25.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	5.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
▶	5.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
✓	11.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
	8.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
	8.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) th)))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
	3.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
	7.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
	15.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th th) (.f64 th #s(literal -1/6 binary64)) th)))
	15.8%	#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)))
	15.8%	#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 #s(literal -1/6 binary64)) th) th)))
✓	15.8%	#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.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)))))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))))))
	7.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 (.f64 th (.f64 th th)) (+.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 th th)))))))
▶	11.4%	#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))))))

Compiler

Compiled 3 128 to 1 857 computations (40.6% saved)

simplify227.0ms (1.7%)

Memory

-20.4MiB live, 229.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 th (sin.f64 ky))
cost-diff	0	(.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))))))
cost-diff	0	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
cost-diff	384	(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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/2 binary64) (sin.f64 th))
cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
cost-diff	320	(fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx))
cost-diff	6400	(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))
cost-diff	0	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
cost-diff	128	(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th)
cost-diff	192	(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
cost-diff	512	(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)
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 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
cost-diff	0	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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	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

4 614×	`lower-*.f32`
4 584×	`lower-*.f64`
4 550×	`lower-fma.f32`
4 536×	`lower-fma.f64`
1 810×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	657
0	135	647
1	224	633
2	401	619
3	833	606
4	1497	603
5	2626	600
6	4570	600
0	8079	564

Stop Event

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

Calls

Call 1

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

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

localize646.0ms (4.8%)

Memory

38.0MiB live, 639.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	3.401236456797597	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
accuracy	14.58106466678807	(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
accuracy	16.277799130182228	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	29.62056502036657	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
accuracy	9.890206810480398	(fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx))
accuracy	13.251912510795487	#s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky)))
accuracy	21.702237279112666	(/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))
accuracy	50.07418778606861	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
accuracy	6.954447368636101	(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)
accuracy	16.277799130182228	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
accuracy	22.552936815637658	#s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))
accuracy	50.07418778606861	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
accuracy	0.140625	(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
accuracy	30.11062077688586	#s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))))
accuracy	31.694276118180273	#s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))
accuracy	47.58148513955037	#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	0.19988251953688405	(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	0.23046875	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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	3.2653351640170034	(sqrt.f64 (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	16.28772311859668	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))

Samples

294.0ms	98×	2	valid
159.0ms	84×	1	valid
48.0ms	74×	0	valid

Compiler

Compiled 487 to 74 computations (84.8% saved)

Precisions

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

ival-cos: 166.0ms (39.9% of total)

ival-mult: 80.0ms (19.2% of total)

adjust: 69.0ms (16.6% of total)

ival-sin: 26.0ms (6.2% of total)

ival-add: 22.0ms (5.3% of total)

ival-div: 17.0ms (4.1% of total)

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

const: 9.0ms (2.2% of total)

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

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

exact: 1.0ms (0.2% of total)

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

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

series147.0ms (1.1%)

Memory

-2.9MiB live, 143.4MiB allocated

Counts

29 → 696

Calls

Call 1

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

Outputs
#s(alt (* 1/2 (- 1 (cos (* 2 ky)))) (taylor 0 kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow kx 2)) (taylor 0 kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (taylor 0 kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (taylor 0 kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor -inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor -inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor -inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor -inf kx) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow (sin kx) 2) (taylor 0 ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (pow ky 2) (pow (sin kx) 2)) (taylor 0 ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2)) (taylor 0 ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2)) (taylor 0 ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)) (taylor inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)) (taylor -inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)) (taylor -inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)) (taylor -inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2)) (taylor -inf ky) (#s(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))) (patch (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (patch (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) #<representation binary64>) () ())) ())
#s(alt (* th (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* 1/120 (* (pow th 2) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))))))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2)))))) (* 1/120 (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))))))))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (/ (* (pow kx 2) (sin th)) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* 1/2 (* (/ (* (pow kx 2) (* (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))))))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 ky))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (* (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 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))))))))))) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))) (taylor 0 th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))) (taylor 0 th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor -inf th) (#s(alt #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))))) (patch #s(approx (sin th) #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/6 (pow th 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 3) (- (/ 1 (pow th 2)) 1/6)) (taylor inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2))))) (taylor -inf th) (#s(alt #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th)))) (patch #s(approx (+ ( th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow th 3)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) (patch (.f64 #s(literal -1/6 binary64) (.f64 th (.f64 th th))) #<representation binary64>) () ())) ())
#s(alt th (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ th (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (/ th (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) th) (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (* -1/6 (* (pow kx 2) th))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) th)) (* (pow ky 2) (+ th (+ (* -1/6 (* (pow kx 2) th)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) th)) (+ (* 2/135 (* (pow kx 2) th)) (* 1/3 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) th)) (* 2/45 (* (pow kx 2) th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (+ th (* -1/2 (/ (* (pow kx 2) th) (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) 1))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) 1))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) 1))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (* -1 (* th (- (* 1/2 (/ (pow kx 2) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) 1))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th) #<representation binary64>) () ())) ())
#s(alt (/ 1 (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* 1/3 (pow ky 2))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow ky 2) (+ 1/3 (* 1/15 (pow ky 2))))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow ky 2) (+ 1/3 (* (pow ky 2) (+ 1/15 (* 2/189 (pow ky 2))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ th (pow ky 2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ th (* 1/3 (* (pow ky 2) th))) (pow ky 2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ th (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 th) (* 2/45 th)))) (* -1/3 th)))) (pow ky 2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (+ th (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 th) (+ (* 2/135 th) (* 1/3 (+ (* -1/9 th) (* 2/45 th))))))) (+ (* -1/9 th) (* 2/45 th)))) (* -1/3 th)))) (pow ky 2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor -inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor -inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor -inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ th (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor -inf th) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) (patch (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)) (patch (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow kx 2) (pow ky 2))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow kx 2) (pow ky 2))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2)))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (patch (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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)))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 th) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* 1/12 (pow th 2)) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* (pow th 2) (+ 1/12 (* -1/240 (pow th 2)))) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (- (* (pow th 2) (+ 1/12 (* (pow th 2) (- (* 1/10080 (pow th 2)) 1/240)))) 1/2)) (taylor 0 th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (sin th)) (taylor -inf th) (#s(alt (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (patch (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (pow kx 2))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- 1 (cos (* -2 kx)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* -2 kx)))) (pow ky 2)) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- 1 (cos (* -2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (patch (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))))) (taylor 0 th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf th) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))) (taylor 0 kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(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)))))))))))))))))))) (taylor 0 ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (patch #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor 0 th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf th) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* th (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* -1/6 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))))))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (+ (* -1/6 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))) (+ (* 1/3 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* 1/2 (* (/ (* 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)))))))))))))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (+ (* -1/6 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))) (+ (* 1/3 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (+ (* 1/2 (* (/ (* 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 (* (/ (* 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 (* (/ (* 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 (* (/ th (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* -1/5040 (* (* th (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))))))))))))))))) (taylor 0 ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf ky) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (* (pow kx 2) (* th (sin ky))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* th (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* th (* (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)))))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* th (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* th (* (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 (* (* th (* (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)))))))))))) (taylor 0 kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))) (taylor -inf kx) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor 0 th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor 0 th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor 0 th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor 0 th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf th) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky th) (taylor 0 ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ th (* -1/6 (* (pow ky 2) th)))) (taylor 0 ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* 1/120 (* (pow ky 2) th)))))) (taylor 0 ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) th)) (* 1/120 th))))))) (taylor 0 ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* th (sin ky)) (taylor -inf ky) (#s(alt (.f64 th (sin.f64 ky)) (patch (.f64 th (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* 2 (pow ky 2)) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 2 (* -2/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 2 (* (pow ky 2) (- (* (pow ky 2) (+ 4/45 (* -2/315 (pow ky 2)))) 2/3)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 ky))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 ky))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 ky))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* 2 ky))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 ky)))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 ky)))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 ky)))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (neg (* -2 ky)))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (/ (pow kx 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 ky))))) (* (pow kx 2) (+ (* -1/2 (* (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 ky)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 ky))))) (* (pow kx 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 ky))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky))))))) (* 1/2 (* (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 ky))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 ky)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 ky)))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx)))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (* 2 ky)))) (pow (sin kx) 2))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 ky))))) (pow (sin kx) 2))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6))))) (taylor 0 th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2)))) (taylor -inf kx) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2))) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))) (taylor -inf ky) (#s(alt #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) (patch #s(approx (+ ( (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow kx 2) (+ 1 (* 1/3 (pow ky 2)))) (pow ky 2)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow kx 2)) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow kx 2)) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (pow kx 2)) (/ (pow kx 2) (pow ky 2))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) (patch (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor 0 kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf kx) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/3 (* (pow kx 2) (pow ky 2))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))) (* -1/3 (pow kx 2)))) (pow kx 2)) (pow ky 2)) (taylor 0 ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (/ (pow kx 2) (pow (sin ky) 2)) (taylor -inf ky) (#s(alt #s(approx (/ (* kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (.f64 ky ky))) (patch #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -2 ky)))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (pow kx 2)) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (cos (* -2 kx))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (patch (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(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)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(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))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(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))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())

Calls

174 calls:

Time	Variable		Point	Expression
15.0ms	ky	@	0	(* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)))))
14.0ms	kx	@	-inf	(+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))
4.0ms	th	@	inf	(* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky))
2.0ms	th	@	0	(* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)))))
2.0ms	kx	@	0	(* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky))

simplify410.0ms (3%)

Memory

39.0MiB live, 454.0MiB allocated

Algorithm

1×	egg-herbie

Rules

8 398×	`lower-fma.f64`
8 398×	`lower-fma.f32`
6 732×	`lower-*.f64`
6 732×	`lower-*.f32`
6 474×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1065	16119
1	3526	15573
0	8130	14654

Stop Event

1×	iter limit
1×	node limit

Counts

696 → 693

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

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

rewrite213.0ms (1.6%)

Memory

4.8MiB live, 279.3MiB allocated

Rules

2 172×	`lower-fma.f32`
2 158×	`lower-fma.f64`
1 904×	`lower-*.f32`
1 874×	`lower-*.f64`
1 302×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	550
0	135	541
1	490	494
0	3765	464

Stop Event

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

Counts

29 → 379

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

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

eval236.0ms (1.8%)

Memory: -17.5MiB live, 447.7MiB allocated
Compiler: Compiled 31 906 to 2 410 computations (92.4% saved)

prune308.0ms (2.3%)

Memory

29.8MiB live, 662.4MiB allocated

Pruning

86 alts after pruning (79 fresh and 7 done)

	Pruned	Kept	Total
New	1 043	29	1 072
Fresh	10	50	60
Picked	3	2	5
Done	1	5	6
Total	1 057	86	1 143

Accuracy

100.0%

Counts

1 143 → 86

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.8%	(/.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)))))))
	64.6%	(*.f64 (/.f64 (pow.f64 (sqrt.f64 (sin.f64 ky)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	75.9%	(*.f64 (/.f64 (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 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky))
	38.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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
	28.2%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #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))
	33.1%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
	43.0%	(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
	33.0%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
	28.1%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
	31.0%	(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
	75.6%	(.f64 (/.f64 (sin.f64 ky) (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))) (sin.f64 th))
✓	52.9%	(.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)))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))
	28.2%	(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	75.9%	(.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))
	31.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	18.8%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	75.8%	(.f64 (.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))) (sin.f64 th))
	75.9%	(.f64 (.f64 (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))
	28.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 ky))
	40.2%	(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
	27.8%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	9.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	12.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	10.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
	27.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
	10.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
	8.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
	17.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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)))))
	40.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	40.2%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
	28.2%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))
	27.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))))
	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
✓	28.0%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
	23.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
	23.8%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
	40.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
✓	40.1%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
	22.2%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
	22.5%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	22.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
	19.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
	14.7%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
	17.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))))
	14.5%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
	14.6%	#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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)))))))))
	25.9%	#s(approx (* (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	18.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
	21.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
	12.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
	12.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
	14.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
	22.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
✓	93.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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)))))))
	48.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
	40.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
	41.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
	31.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
	29.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
✓	25.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	5.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
	2.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
	12.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) th)))
	12.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
	8.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
	8.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
	12.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) th)))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
	2.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
	3.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
	3.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
	3.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
	15.8%	#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)))
	15.8%	#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 #s(literal -1/6 binary64)) th) th)))
✓	15.8%	#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.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)))))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
	15.3%	#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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))))))
	7.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 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
	11.4%	#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))))))
	11.4%	#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 #s(literal -1/6 binary64) (*.f64 th th)) th))))
✓	11.4%	#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))))))

Compiler

Compiled 4 355 to 1 620 computations (62.8% saved)

regimes368.0ms (2.7%)

Memory

3.0MiB live, 731.9MiB allocated

Counts

120 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 kx (.f64 kx (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (sin.f64 ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(*.f64 (/.f64 (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 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 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 (/.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 (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 (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 th) (sqrt.f64 (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 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.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))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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))))))
(.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 (/.f64 (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(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.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)))))))
(.f64 (/.f64 (sin.f64 ky) (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))) (sin.f64 th))
(*.f64 (/.f64 (pow.f64 (sqrt.f64 (sin.f64 ky)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (.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))) (sin.f64 th))

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

Calls

9 calls:

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))
47.0ms	th
45.0ms	ky
40.0ms	(sin.f64 ky)
37.0ms	(sin.f64 th)

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes362.0ms (2.7%)

Memory

-11.6MiB live, 573.3MiB allocated

Counts

108 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 kx (.f64 kx (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (sin.f64 ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(*.f64 (/.f64 (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 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 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 (/.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 (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))

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

Calls

9 calls:

93.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
36.0ms	th
33.0ms	kx
32.0ms	(sin.f64 kx)
32.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes313.0ms (2.3%)

Memory

50.8MiB live, 379.2MiB 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (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))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (.f64 (/.f64 kx (sin.f64 ky)) (/.f64 kx (sin.f64 ky))) (sin.f64 th)))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 kx (.f64 kx (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (sin.f64 ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin kx) 2) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))

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

8 calls:

69.0ms	kx
62.0ms	(sin.f64 kx)
32.0ms	th
31.0ms	(sin.f64 th)
29.0ms	ky

Results

Accuracy	Segments	Branch
77.4%	3	`(sin.f64 th)`
77.2%	2	`th`
88.2%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
79.3%	3	`(sin.f64 ky)`
78.4%	3	`(sin.f64 kx)`
77.3%	2	`ky`
77.2%	2	`kx`
77.2%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`

Compiler

Compiled 50 to 38 computations (24% saved)

regimes66.0ms (0.5%)

Memory

-36.6MiB live, 108.5MiB allocated

Counts

95 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 kx))) (sin.f64 th))

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

Calls

2 calls:

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

24.0ms

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

Results

Accuracy	Segments	Branch
71.0%	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))`
86.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 35 to 24 computations (31.4% saved)

regimes32.0ms (0.2%)

Memory

15.9MiB live, 61.1MiB allocated

Counts

94 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes32.0ms (0.2%)

Memory

14.0MiB live, 58.2MiB allocated

Counts

93 → 5

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes238.0ms (1.8%)

Memory

-2.7MiB live, 366.7MiB allocated

Counts

90 → 7

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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (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) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))))
(.f64 (/.f64 #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) 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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))))

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

Calls

8 calls:

35.0ms	(sin.f64 ky)
34.0ms	(sin.f64 th)
31.0ms	th
28.0ms	ky
26.0ms	kx

Results

Accuracy	Segments	Branch
59.6%	4	`(sin.f64 th)`
66.4%	4	`(sin.f64 kx)`
59.7%	3	`th`
62.8%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
65.1%	3	`kx`
66.7%	3	`ky`
68.6%	4	`(sin.f64 ky)`
80.3%	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)))))`

Compiler

Compiled 50 to 38 computations (24% saved)

regimes46.0ms (0.3%)

Memory

-5.6MiB live, 41.1MiB allocated

Counts

85 → 7

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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.f64 ky))

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes30.0ms (0.2%)

Memory

4.3MiB live, 58.1MiB allocated

Counts

84 → 7

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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (sin.f64 th) (sqrt.f64 (fma.f64 #s(approx (- 1 (cos (+ kx kx))) (.f64 #s(literal 2 binary64) (.f64 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))

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

Calls

1 calls:

24.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes100.0ms (0.7%)

Memory

39.4MiB live, 174.7MiB allocated

Counts

81 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) 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 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (sin.f64 ky))

Outputs

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

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

Calls

4 calls:

26.0ms	(sin.f64 ky)
24.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))
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)))))
22.0ms	ky

Results

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

Compiler

Compiled 44 to 31 computations (29.5% saved)

regimes53.0ms (0.4%)

Memory

-6.9MiB live, 91.8MiB allocated

Counts

77 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))
(.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin 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))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))
(.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky 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)))))) (sin.f64 ky))

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 20 to 14 computations (30% saved)

regimes67.0ms (0.5%)

Memory

-4.2MiB live, 41.0MiB 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 (/.f64 (sin.f64 th) (sqrt.f64 #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))

Outputs

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

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

62.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
65.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)

regimes52.0ms (0.4%)

Memory

-6.0MiB live, 37.7MiB 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))

Outputs

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

47.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
65.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)

regimes207.0ms (1.5%)

Memory

-30.0MiB live, 288.4MiB allocated

Counts

70 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (.f64 (fma.f64 ky (.f64 ky (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (/.f64 #s(literal 1 binary64) (.f64 ky ky)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* (sin th) (sin ky)) (sqrt (/ 1 (+ (* -1/2 (cos (* ky -2))) 1/2)))) (.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 kx kx (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* kx -2))) (.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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 kx kx) #s(literal 1/15 binary64)) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 (.f64 kx kx) #s(literal 11/945 binary64))))) (.f64 #s(literal 1/3 binary64) (.f64 kx kx))) (.f64 kx kx)) (.f64 ky ky))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 #s(approx (* -1/2 (sin th)) (.f64 th #s(literal -1/2 binary64))) (/.f64 (.f64 kx kx) (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)))) (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (*.f64 #s(approx (* (sin th) (sin ky)) (*.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (*.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

8 calls:

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

Results

Accuracy	Segments	Branch
40.5%	4	`(sin.f64 th)`
47.6%	4	`ky`
40.0%	3	`th`
51.1%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
53.8%	3	`(sin.f64 kx)`
51.1%	3	`kx`
49.6%	3	`(sin.f64 ky)`
57.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 50 to 38 computations (24% saved)

regimes20.0ms (0.1%)

Memory

-10.8MiB live, 34.3MiB allocated

Counts

55 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (fma.f64 (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 th (*.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (.f64 #s(literal 1/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)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 #s(approx (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/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))))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)))) #s(approx (+ ( -1/2 (cos (* ky -2))) 1/2) (*.f64 ky ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 kx kx)) (.f64 ky ky) (.f64 kx kx)) (*.f64 ky ky))) (sin.f64 th)))

Outputs

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

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

regimes90.0ms (0.7%)

Memory

7.7MiB live, 149.5MiB allocated

Counts

47 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) #s(approx (/ ( kx kx) (pow (sin ky) 2)) #s(approx (/ (+ (* (* 1/3 (* kx kx)) (* ky ky)) (* kx kx)) (* ky ky)) (.f64 (.f64 kx kx) #s(literal 1/3 binary64)))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (/.f64 (.f64 kx kx) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (sin.f64 th)))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) th) th)))

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
41.2%	2	`(sin.f64 ky)`
39.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
39.4%	2	`kx`
38.8%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
43.0%	3	`(sin.f64 kx)`
47.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 56 to 41 computations (26.8% saved)

regimes13.0ms (0.1%)

Memory

24.3MiB live, 24.3MiB allocated

Counts

37 → 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sin.f64 th)) (.f64 ky ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 (/.f64 th (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (.f64 kx #s(literal -1/2 binary64))) kx th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (fma.f64 (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) th) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (.f64 (.f64 kx kx) (fma.f64 th (/.f64 #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 th (.f64 kx kx)))))))
#s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (.f64 ky (.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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 ky ky) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 kx (.f64 kx kx))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 ky #s(approx (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx))) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64))))) (.f64 kx (.f64 kx kx)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx ( ky (+ (* (* ky ky) (+ (/ -1/2 (pow (sin kx) 3)) (/ -1/6 (sin kx)))) (/ 1 (sin kx)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 (.f64 ky ky) #s(literal -71/720 binary64) #s(literal 1/6 binary64))) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) ky)))) (.f64 kx (*.f64 kx kx))))) (sin.f64 th))
#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 th) (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)))) (sin ky)) (/.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:

10.0ms

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

Results

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

regimes113.0ms (0.8%)

Memory

7.9MiB live, 183.5MiB allocated

Counts

35 → 2

Calls

Call 1

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

Outputs

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

9 calls:

20.0ms	kx
16.0ms	(sin.f64 th)
13.0ms	(sin.f64 kx)
12.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
10.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
34.1%	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))`
29.0%	3	`(sin.f64 th)`
28.5%	2	`th`
38.1%	3	`kx`
38.0%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
31.8%	2	`(sin.f64 ky)`
38.2%	4	`(sin.f64 kx)`
31.9%	2	`ky`
37.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)

regimes30.0ms (0.2%)

Memory

4.3MiB live, 50.9MiB allocated

Counts

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

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

4 calls:

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

Results

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

Compiler

Compiled 32 to 24 computations (25% saved)

regimes70.0ms (0.5%)

Memory

-7.9MiB live, 105.2MiB 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 #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) #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)))
#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 #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) (fma.f64 (.f64 th 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 (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* th (/ (* -1/2 (* kx kx)) (pow (sin ky) 2))) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) #s(approx (+ (* (* -1/2 (* kx kx)) (* (/ 1 (+ (* -1/2 (cos (+ ky ky))) 1/2)) th)) th) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) th) (.f64 ky ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (*.f64 ky ky))) 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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 th th)) #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 #s(approx (/ 1 (+ ( -1/2 (cos (+ ky ky))) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 ky ky) #s(literal 1 binary64)) (.f64 ky ky))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 kx kx) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (.f64 ky ky))) (.f64 ky ky))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 1/2) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))))) th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( -1/2 (cos (+ ky ky))) 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))))) th) 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 th th) (.f64 (.f64 (.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th))) (.f64 th #s(literal -1/6 binary64))) (.f64 th th))) (-.f64 th (.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th 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 #s(literal -1/6 binary64) (.f64 th th)) th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th))) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) (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 #s(literal -1/6 binary64) (.f64 th th)) (neg.f64 th)) (.f64 (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)) (neg.f64 th)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (+ (* (* -1/2 (sin th)) (/ (* kx kx) (pow (sin ky) 2))) (sin th)) (fma.f64 th #s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 #s(literal -1/2 binary64) (.f64 kx kx))) (.f64 ky ky))) 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)) #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:

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

Results

Accuracy	Segments	Branch
18.6%	2	`(sin.f64 th)`
18.5%	2	`th`
20.2%	2	`(sin.f64 kx)`
21.2%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
21.2%	2	`kx`
21.9%	3	`(sin.f64 ky)`
21.6%	3	`ky`
23.5%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
23.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)

regimes7.0ms (0.1%)

Memory

-34.2MiB live, 13.0MiB allocated

Counts

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

Calls

2 calls:

4.0ms

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

3.0ms

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

Results

Accuracy	Segments	Branch
23.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)))))`
23.0%	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 35 to 24 computations (31.4% saved)

regimes18.0ms (0.1%)

Memory

-7.5MiB live, 39.7MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

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

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	8.862587745389826e-14	0.0002978886926007268

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	-0.007631036854554753	2.1452833900538505e-306
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	-0.007631036854554753	2.1452833900538505e-306
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	-0.07656183874859243	-0.05532809898299247
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.7MiB live, 1.8MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	-0.07656183874859243	-0.05532809898299247
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated

Algorithm

6×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	2.770859085960799e-53	1.472764405467545e-44
0.0ms	4.7650186268994183e-119	4.9775467097481865e-118
0.0ms	-0.07656183874859243	-0.05532809898299247
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Algorithm

6×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	2.770859085960799e-53	1.472764405467545e-44
0.0ms	4.7650186268994183e-119	4.9775467097481865e-118
0.0ms	-0.07656183874859243	-0.05532809898299247
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Algorithm

6×	left-value

Steps

Time	Left	Right
0.0ms	0.997870194364524	1.0
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	2.770859085960799e-53	1.472764405467545e-44
0.0ms	4.7650186268994183e-119	4.9775467097481865e-118
0.0ms	-0.07656183874859243	-0.05532809898299247
0.0ms	-0.9988950133671063	-0.9982062725235539

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch31.0ms (0.2%)

Memory

5.1MiB live, 51.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
24.0ms	6.3152230460598e-6	18.342002718097156
5.0ms	7.557363792748605e-143	8.608894451396528e-143

Samples

22.0ms

176×

valid

Compiler

Compiled 472 to 347 computations (26.5% saved)

Precisions

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

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

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

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

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

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

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

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

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

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.7052297240286228	0.7110231146440762
0.0ms	-0.734928606203666	-0.6980791533789003

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	7.128440492281048e-6	0.0003414843216454201
0.0ms	-0.007631036854554753	2.1452833900538505e-306

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	7.128440492281048e-6	0.0003414843216454201
0.0ms	-0.007631036854554753	2.1452833900538505e-306

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	7.128440492281048e-6	0.0003414843216454201
0.0ms	-0.007631036854554753	2.1452833900538505e-306

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.016076625911692503	0.11530758017776055
0.0ms	-0.05532809898299247	-0.007631036854554753

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.016076625911692503	0.11530758017776055

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.016076625911692503	0.11530758017776055

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.784339947118353e-19	1.1447636959769146e-18

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	1.2603468293928406e-75	2.0648062036554405e-74

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	1.5923003944259726e-306	8.09584742697353e-305

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch5.0ms (0%)

Memory

4.9MiB live, 4.9MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
4.0ms	1.525779260816284e-73	1.9932284377236276e-73

Samples

3.0ms

48×

valid

Compiler

Compiled 106 to 67 computations (36.8% saved)

Precisions

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

ival-sin: 1.0ms (68.9% of total)

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

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

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

simplify31.0ms (0.2%)

Memory

-17.9MiB live, 29.6MiB allocated

Algorithm

1×	egg-herbie

Rules

70×	`*-commutative_binary64`
10×	`+-commutative_binary64`
8×	`sub-neg_binary64`
4×	`neg-sub0_binary64`
4×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	244	3245
1	285	3245
2	292	3245
3	296	3245
4	298	3245

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 3961408125713217/39614081257132168796771975168 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) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (.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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 #s(approx (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))))
(if (<=.f64 ky #s(literal 8347593954718821/109836762562089755439710412785302291476310964802292886550311415346968690934362496833960954250583272879636740982263693728593951807995466301001184452657840914432 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 ky #s(literal 7349874591868649/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 799388933858263/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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 -5764607523034235/1152921504606846976 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 -3602879701896397/72057594037927936 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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)))))) (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 #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/288230376151711744 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/288230376151711744 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 1298074214633707/1298074214633706907132624082305024 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 1018517988167243/509258994083621521567111422102344540262867098416484062659035112338595324940834176545849344 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 6325070415853457/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 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)) #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 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 6206593990394137/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 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)) #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) #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 3961408125713217/39614081257132168796771975168 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) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3961408125713217/39614081257132168796771975168 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) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (.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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sin.f64 kx)))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (.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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sin.f64 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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sin.f64 kx)))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 #s(approx (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 th) (sqrt.f64 #s(approx (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #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 8988015671008389/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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))))))))) (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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx)))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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))))))) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 #s(approx (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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.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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 th (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.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))))))))) (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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx)))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 th (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) (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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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)) (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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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)) #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 -8993688455858881/9007199254740992 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (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 -1080863910568919/18014398509481984 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 th (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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 4542742026847543/90854840536950861318665475986000566794205170085914757535186274897579911014174740415773881339220445695095315200783272241691825203576832 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 336999333339383/6739986666787659948666753771754907668409286105635143120275902562304 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx)))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/288230376151711744 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.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 8988015671008389/9007199254740992 binary64)) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 th (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))))
(if (<=.f64 ky #s(literal 8347593954718821/109836762562089755439710412785302291476310964802292886550311415346968690934362496833960954250583272879636740982263693728593951807995466301001184452657840914432 binary64)) (.f64 (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx))) (sin.f64 ky)) (if (<=.f64 ky #s(literal 7349874591868649/288230376151711744 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (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) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 ky #s(literal 8347593954718821/109836762562089755439710412785302291476310964802292886550311415346968690934362496833960954250583272879636740982263693728593951807995466301001184452657840914432 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ ( (sin kx) (sin kx)) (* (- 1 (cos (+ ky ky))) 1/2))) (sin.f64 kx)))) (if (<=.f64 ky #s(literal 7349874591868649/288230376151711744 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) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 ky ky)))))) #s(approx ( (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 799388933858263/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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 -3152519739159347/4503599627370496 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (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 799388933858263/1125899906842624 binary64)) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (.f64 #s(literal 1/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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.f64 (.f64 (sin.f64 th) (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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (/.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))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 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 (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 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 (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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 5902958103587057/590295810358705651712 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 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 (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 -3602879701896397/72057594037927936 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 #s(approx ( (sin th) (sin ky)) (.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)))))) (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 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx (* (/ (sin th) (sqrt (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.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 5764607523034235/288230376151711744 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/288230376151711744 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/288230376151711744 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/288230376151711744 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 1298074214633707/1298074214633706907132624082305024 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ ( (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 ky (sin.f64 kx))) #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 1018517988167243/509258994083621521567111422102344540262867098416484062659035112338595324940834176545849344 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 6325070415853457/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 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)) #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 6325070415853457/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 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)) #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 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 6206593990394137/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 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)) #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) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))))

soundness2.0s (14.5%)

Memory

1.0MiB live, 1 598.7MiB allocated

Rules

14 278×	`lower-fma.f64`
14 278×	`lower-fma.f32`
8 398×	`lower-fma.f64`
8 398×	`lower-fma.f32`
8 166×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	872	13031
1	2776	12543
2	6918	12467
0	8022	11755
0	836	12148
1	2737	11708
2	6971	11605
0	8077	11045
0	85	550
0	135	541
1	490	494
0	3765	464
0	13	49
0	22	49
1	62	49
2	338	49
3	2902	49
0	8284	34
0	67	348
0	102	314
1	371	301
0	2696	294
0	317	2263
1	1011	2214
2	3860	2122
3	7804	2122
0	8107	1974
0	1065	16119
1	3526	15573
0	8130	14654
0	52	319
0	90	303
1	347	276
0	2883	269

Stop Event

1×	fuel
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×	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

Compiler

Compiled 4 005 to 1 722 computations (57% saved)

preprocess152.0ms (1.1%)

Memory

16.7MiB live, 334.2MiB allocated

Remove

(negabs ky)

(negabs th)

(abs kx)

Compiler

Compiled 3 846 to 442 computations (88.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated