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

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze257.0ms (1.8%)

Memory

9.2MiB live, 289.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.0s (14.2%)

Memory

-21.4MiB live, 2 755.1MiB allocated

Samples

1.7s

8 256×

valid

Precisions

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

ival-sin: 764.0ms (64.5% of total)

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

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

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

ival-mult: 51.0ms (4.3% of total)

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

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

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

Bogosity

explain200.0ms (1.4%)

Memory

-0.4MiB live, 380.7MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
12	-	1	(-1.0273709302278601e-155 -1.4054111315918817e-276 1.0257013598333699e-178)	`(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	11	0
↳	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`	underflow	53
↳	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`	underflow	47
↳	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`	underflow	11

Confusion

	Predicted +	Predicted -
+	11	1
-	0	244

Precision

1.0

Recall

0.9166666666666666

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	11	0	1
-	0	0	244

Precision?

1.0

Recall?

0.9166666666666666

Freqs

test

number	freq
0	245
1	11

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

90.0ms

512×

valid

Compiler

Compiled 155 to 43 computations (72.3% saved)

Precisions

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

ival-sin: 42.0ms (60% of total)

ival-pow2: 15.0ms (21.4% of total)

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

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

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

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

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

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

exact: 0.0ms (0% of total)

preprocess76.0ms (0.5%)

Memory

-3.7MiB live, 40.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.4MiB live, 0.4MiB allocated
Compiler: Compiled 3 to 3 computations (0% saved)

prune1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Alt Table

Click to see full alt table

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

Compiler

Compiled 19 to 13 computations (31.6% saved)

simplify4.0ms (0%)

Memory

7.3MiB live, 7.3MiB 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

localize76.0ms (0.5%)

Memory

20.8MiB live, 64.5MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.171875	(/.f64 (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.20150375976844204	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy	0.28515625	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	2.7157317044752585	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))

Samples

62.0ms

256×

valid

Compiler

Compiled 68 to 15 computations (77.9% saved)

Precisions

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

ival-sin: 41.0ms (79% of total)

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

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

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

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

ival-add: 1.0ms (1.9% 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

2.3MiB live, 47.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
10.0ms	kx	@	0	(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))
2.0ms	th	@	inf	(* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th))

simplify386.0ms (2.7%)

Memory

-22.5MiB live, 737.8MiB 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))

rewrite270.0ms (1.9%)

Memory

-12.1MiB live, 420.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))

eval59.0ms (0.4%)

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

prune102.0ms (0.7%)

Memory

-24.3MiB live, 223.5MiB allocated

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	424	24	448
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	425	24	449

Accuracy

100.0%

Counts

449 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.5%	(/.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)))))))
	79.6%	(/.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)))
	95.2%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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))
	79.6%	(.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))
▶	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	78.5%	(.f64 (/.f64 (sin.f64 ky) (/.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))))))))))))) (sin.f64 th))
	79.6%	(.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.4%	(.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))
	88.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	47.6%	(.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))
	27.2%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 ky (.f64 ky (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (sin.f64 kx)))) (sin.f64 th))
	31.5%	(.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))
	28.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	79.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
▶	79.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th))
	52.8%	(.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))
	79.4%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	22.2%	(.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))
	25.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	95.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (sin.f64 th))
	24.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	46.8%	#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)))
▶	22.4%	#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))))))
▶	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 1 284 to 750 computations (41.6% saved)

simplify234.0ms (1.7%)

Memory

13.3MiB live, 200.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

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

Rules

9 762×	`lower-fma.f32`
9 756×	`lower-fma.f64`
4 034×	`lower-*.f32`
4 014×	`lower-*.f64`
1 170×	`associate-*r/`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	446
0	94	436
1	144	436
2	266	431
3	678	413
4	1933	406
5	2986	402
6	3662	402
7	4175	402
8	5155	394
9	5968	394
10	6422	394
11	6863	394
12	7121	394
13	7577	394
14	7832	394
0	8012	389

Stop Event

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

Calls

Call 1

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

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

localize438.0ms (3.1%)

Memory

-25.4MiB live, 400.3MiB allocated

Localize:

Found 18 expressions of interest:

New	Metric	Score
accuracy	1.742946652227492	(.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx)))
accuracy	1.9681573863202704	(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))))
accuracy	5.4836700756631975	(/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
accuracy	47.77213124237375	#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))))))
accuracy	0.2936325195368841	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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	2.931160020799181	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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.968328316311116	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
accuracy	17.99831406333953	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
accuracy	0.171875	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
accuracy	0.28515625	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	2.7157317044752585	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
accuracy	31.02524862342178	#s(approx (pow (sin ky) 2) (*.f64 ky ky))
accuracy	0	(sin.f64 th)
accuracy	45.550954933321236	#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.046875	(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.171875	(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))

Samples

150.0ms	94×	2	valid
75.0ms	90×	1	valid
71.0ms	72×	0	valid

Compiler

Compiled 429 to 48 computations (88.8% saved)

Precisions

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

ival-cos: 72.0ms (29% of total)

ival-mult: 71.0ms (28.6% of total)

ival-sin: 27.0ms (10.9% of total)

adjust: 20.0ms (8.1% of total)

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

ival-add: 12.0ms (4.8% of total)

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

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

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

const: 5.0ms (2% of total)

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

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

exact: 1.0ms (0.4% of total)

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

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

series101.0ms (0.7%)

Memory

41.3MiB live, 168.9MiB allocated

Counts

24 → 600

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 (.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)) (patch (.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)) #<representation binary64>) () ())
#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<representation binary64>) () ())
#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())
#s(alt #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)))))) (patch #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)))))) #<representation binary64>) () ())
#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 kx) (patch (sin.f64 kx) #<representation binary64>) () ())
#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky 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 (-.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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (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 (/ (* 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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (patch (.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)) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor 0 kx) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sin kx) (taylor 0 ky) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))) #<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 (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (- 1 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor 0 ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt (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)))) (patch (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)))) #<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)) (.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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.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))))) (patch (.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))))) #<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 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))))) (patch (.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))))) #<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 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))))) (patch (.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))))) #<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 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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))))))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))))))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor 0 ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor 0 ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor 0 ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor 0 ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf ky) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky th) (pow (sin kx) 3))) (taylor 0 th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* 1/12 (/ (* ky (pow th 2)) (pow (sin kx) 3))))) (taylor 0 th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (* ky (pow th 2)) (pow (sin kx) 3))) (* 1/12 (/ ky (pow (sin kx) 3))))))) (taylor 0 th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* 1/12 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ ky (pow (sin kx) 3))) (* 1/10080 (/ (* ky (pow th 2)) (pow (sin kx) 3))))))))) (taylor 0 th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf th) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* ky (sin th))) (* -1/4 (* (pow kx 2) (* ky (sin th))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 1/2 (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (+ (* -41/3024 (* ky (sin th))) (+ (* 13/240 (* ky (sin th))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th)))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3))) (taylor -inf kx) (#s(alt (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (patch (/.f64 (.f64 ky (.f64 #s(literal -1/2 binary64) (sin.f64 th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #<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 ky 2) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.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 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.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 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (.f64 ky 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 (* 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 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 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 th) (sin kx)) (taylor 0 ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx))) (taylor 0 ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (taylor inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (taylor -inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))) (taylor -inf ky) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* th (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor 0 th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/6 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/120 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf th) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) kx) (taylor 0 kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/6 (* (pow kx 2) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) kx) (taylor 0 kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx) (taylor 0 kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (+ (* 1/720 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/6 (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx) (taylor 0 kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)) (taylor -inf kx) (#s(alt (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())

Calls

150 calls:

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

simplify354.0ms (2.5%)

Memory

14.8MiB live, 486.8MiB allocated

Algorithm

1×	egg-herbie

Rules

9 170×	`lower-fma.f64`
9 170×	`lower-fma.f32`
7 460×	`lower-+.f64`
7 460×	`lower-+.f32`
6 720×	`lower-*.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	946	15756
1	3217	15326
0	8077	14312

Stop Event

1×	iter limit
1×	node limit

Counts

600 → 597

Calls

Call 1

Inputs
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin kx)
(+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))
(+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))
(+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sin ky)
(+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))
(+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))
(+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(sin th)
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin ky)
(+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))
(+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))
(+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sin kx)
(+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))
(+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))
(+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(* 1/2 (- 1 (cos (* 2 kx))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(/ (sin th) (sin kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (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 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))))) (/ (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))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky th) (pow (sin kx) 3)))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* 1/12 (/ (* ky (pow th 2)) (pow (sin kx) 3)))))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (* ky (pow th 2)) (pow (sin kx) 3))) (* 1/12 (/ ky (pow (sin kx) 3)))))))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* 1/12 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ ky (pow (sin kx) 3))) (* 1/10080 (/ (* ky (pow th 2)) (pow (sin kx) 3)))))))))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* ky (sin th))) (* -1/4 (* (pow kx 2) (* ky (sin th))))) (pow kx 3))
(/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 1/2 (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (pow kx 3))
(/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (+ (* -41/3024 (* ky (sin th))) (+ (* 13/240 (* ky (sin th))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th)))))))))) (pow kx 3))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
kx
(* kx (+ 1 (* -1/6 (pow kx 2))))
(* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))
(* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))
(sin kx)
(sin kx)
(sin kx)
(sin kx)
(sin kx)
(sin kx)
(sin kx)
(sin kx)
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow kx 2)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(pow (sin kx) 2)
(* 2 (pow kx 2))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (* 2 kx)))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(- 1 (cos (neg (* -2 kx))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(/ (sin th) (sin kx))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx)))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx)))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(/ (* th (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(* th (+ (* -1/6 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/120 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))) (/ 1 (sin kx)))))
(* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))) (/ 1 (sin kx)))))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) kx)
(/ (+ (* 1/6 (* (pow kx 2) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) kx)
(/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx)
(/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (+ (* 1/720 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/6 (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx)
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (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) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 binary64) (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 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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)) #s(literal 1/120 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (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/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 (.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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (sin.f64 ky) (sqrt.f64 (/.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/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (*.f64 th th))))))))
(* 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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (neg.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(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/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)))) (neg.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (-.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (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)))) (+.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 (.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)))))) (neg.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))) (/.f64 ky (sin.f64 kx)))
(* (sin ky) (sqrt (/ 1 (+ (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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(fma.f64 ky (.f64 (.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 #s(literal 1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (/.f64 (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 (*.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) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 binary64) (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 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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)) #s(literal 1/120 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (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/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 (.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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (sin.f64 ky) (sqrt.f64 (/.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/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (*.f64 th th))))))))
(* 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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(/ (* ky (sin th)) (sin kx))
(/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 binary64) (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 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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)) #s(literal 1/120 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (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/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 (.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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (sin.f64 ky) (sqrt.f64 (/.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/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (*.f64 th th))))))))
(* 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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (neg.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(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/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)))) (neg.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (-.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (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)))) (+.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 (.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)))))) (neg.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))) (/.f64 ky (sin.f64 kx)))
(* (sin ky) (sqrt (/ 1 (+ (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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(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))
(sin kx)
(sin.f64 kx)
(+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (/.f64 (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))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (pow kx 2)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (- 1 (cos (* 2 kx))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 ky ky))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (.f64 ky ky) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (-.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 (.f64 ky ky) (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 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (.f64 kx kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (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 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (sin.f64 ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (+.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 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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 #s(literal 1/3 binary64) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 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))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (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 #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))))) (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 kx #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 th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/10080 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) #s(literal -1/6 binary64)) (sin.f64 kx)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)))) (.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal 7/360 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))))) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 binary64) (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 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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)) #s(literal 1/120 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (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/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal 1/12 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))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 (.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 (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 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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 (sin.f64 ky) (sqrt.f64 (/.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/6 binary64) (sin.f64 ky) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 ky) (*.f64 th th))))))))
(* 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 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.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) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky (.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))) (.f64 ky (*.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))) (.f64 ky (*.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))) (.f64 ky (*.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky (.f64 ky ky)))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(neg.f64 (.f64 (.f64 ky (.f64 ky ky)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(neg.f64 (.f64 (.f64 ky (.f64 ky ky)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(neg.f64 (.f64 (.f64 ky (.f64 ky ky)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(.f64 (.f64 ky th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(.f64 th (.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 ky (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (fma.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) (sin.f64 kx))) (/.f64 ky (sin.f64 kx)))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(.f64 th (fma.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))) (.f64 (.f64 th th) (fma.f64 ky (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 th th) (.f64 ky (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/10080 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))))))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th) (.f64 (.f64 (.f64 kx kx) ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky))) (.f64 (.f64 kx kx) (fma.f64 (.f64 (.f64 kx kx) ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))) (.f64 ky (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))))))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 (.f64 kx kx) ky) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)))) (.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal 7/360 binary64))) (.f64 ky (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 th) (.f64 ky ky)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))))) (.f64 ky (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky th) (pow (sin kx) 3)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* 1/12 (/ (* ky (pow th 2)) (pow (sin kx) 3)))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky (.f64 th th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (* ky (pow th 2)) (pow (sin kx) 3))) (* 1/12 (/ ky (pow (sin kx) 3)))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/12 binary64) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky (.f64 th th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* th (+ (* -1/2 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* 1/12 (/ ky (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ ky (pow (sin kx) 3))) (* 1/10080 (/ (* ky (pow th 2)) (pow (sin kx) 3)))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/240 binary64) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/10080 binary64) (.f64 ky (.f64 th th))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 #s(literal 1/12 binary64) (/.f64 ky (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* ky (sin th))) (* -1/4 (* (pow kx 2) (* ky (sin th))))) (pow kx 3))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) (fma.f64 #s(literal -1/4 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 1/2 (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky (sin.f64 th)) #s(literal -1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 ky (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* ky (sin th))) (* (pow kx 2) (+ (* -1/4 (* ky (sin th))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (+ (* -41/3024 (* ky (sin th))) (+ (* 13/240 (* ky (sin th))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th))))))))) (* 1/2 (+ (* -1/4 (* ky (sin th))) (* 13/120 (* ky (sin th)))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky (sin.f64 th)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 ky (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/4 binary64))))) (.f64 kx (.f64 kx kx)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(* -1/2 (/ (* ky (sin th)) (pow (sin kx) 3)))
(/.f64 (.f64 (.f64 ky (sin.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
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))))
(.f64 kx (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))
(fma.f64 kx (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/5040 binary64) (.f64 kx kx) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(sin kx)
(sin.f64 kx)
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow (sin ky) 2)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (.f64 kx kx) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow (sin kx) 2)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(* 2 (pow kx 2))
(.f64 #s(literal 2 binary64) (.f64 kx kx))
(* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))
(.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))
(.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (*.f64 kx kx) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (* 2 kx)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 kx))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 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 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.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)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (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 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (sin.f64 ky) (.f64 kx kx))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (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 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (.f64 (.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 (sin.f64 ky) (+.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 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 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.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))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 th) (.f64 ky ky)) (sin.f64 kx)) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 th) (.f64 ky ky)) (sin.f64 kx)) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx))) (/ (sin th) (sin kx)))
(fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 th) (.f64 ky ky)) (sin.f64 kx)) (/.f64 (sin.f64 th) (sin.f64 kx)))
(* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx)))
(.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 th) (*.f64 ky ky)) (sin.f64 kx)))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(* -1/6 (/ (* (pow ky 2) (sin th)) (sin kx)))
(.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 th) (*.f64 ky ky)) (sin.f64 kx)))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(* (pow ky 2) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))
(/ (* th (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (fma.f64 th (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) th) (sin.f64 kx))
(* th (+ (* -1/6 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(.f64 th (fma.f64 #s(literal -1/6 binary64) (fma.f64 (.f64 th th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 ky ky) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/120 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))) (/ 1 (sin kx)))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) #s(literal -1/6 binary64)) (sin.f64 kx))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(* th (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))) (/ 1 (sin kx)))))
(.f64 th (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) #s(literal -1/6 binary64)) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) kx)
(.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) kx))
(/ (+ (* 1/6 (* (pow kx 2) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) kx)
(/.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) kx)
(/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal 7/360 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) kx)
(/ (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (+ (* 1/720 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/6 (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (fma.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal 1/840 binary64) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal -7/360 binary64)))) (neg.f64 (.f64 kx kx)) (.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #s(literal 7/360 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))))) (.f64 (sin.f64 th) (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) kx)
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))
(/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))
(/.f64 (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 kx))

rewrite149.0ms (1.1%)

Memory

-3.8MiB live, 205.9MiB allocated

Rules

1 216×	`lower-*.f32`
1 202×	`lower-fma.f32`
1 196×	`lower-*.f64`
1 196×	`lower-fma.f64`
956×	`lower-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	54	345
0	94	331
1	338	306
0	2603	306

Stop Event

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

Counts

24 → 372

Calls

Call 1

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

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

eval211.0ms (1.5%)

Memory: -14.1MiB live, 341.4MiB allocated
Compiler: Compiled 33 735 to 2 654 computations (92.1% saved)

prune262.0ms (1.9%)

Memory

-37.9MiB live, 442.2MiB allocated

Pruning

48 alts after pruning (46 fresh and 2 done)

	Pruned	Kept	Total
New	1 086	33	1 119
Fresh	6	13	19
Picked	3	2	5
Done	0	0	0
Total	1 095	48	1 143

Accuracy

100.0%

Counts

1 143 → 48

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.5%	(/.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)))))))
	11.9%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	13.1%	(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
	79.6%	(/.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)))
▶	95.2%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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))
	79.6%	(.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))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.3%	(.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)))
	51.7%	(.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))
	78.5%	(.f64 (/.f64 (sin.f64 ky) (/.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))))))))))))) (sin.f64 th))
▶	12.0%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	79.6%	(.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))
	24.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	28.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	46.5%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	46.1%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	79.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
	79.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	88.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	40.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	31.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))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sin.f64 th))
	31.7%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky))) (sin.f64 th))
	31.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sin.f64 th))
	41.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	42.0%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	40.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	41.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	32.1%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
	31.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky)) (sin.f64 th))
	79.4%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	22.2%	(.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))
	25.9%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	30.2%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	24.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	46.8%	#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)))
▶	8.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))))
	7.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx))))))
	25.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
✓	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	7.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* ky (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx))))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))))
	14.9%	#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.1%	#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.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	30.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
	31.2%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
▶	40.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))))))

Compiler

Compiled 2 532 to 1 529 computations (39.6% saved)

simplify220.0ms (1.6%)

Memory

44.8MiB live, 273.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

9 896×	`lower-fma.f32`
9 880×	`lower-fma.f64`
3 378×	`lower-+.f32`
3 374×	`lower-+.f64`
2 894×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	93	726
0	152	712
1	259	684
2	549	670
3	1460	604
4	2730	593
5	4052	593
6	7819	593
0	8266	545

Stop Event

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

Calls

Call 1

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

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

localize646.0ms (4.6%)

Memory

-7.4MiB live, 653.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.4459762695368841	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
accuracy	11.349608579194658	(sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy	17.99831406333953	(fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy	18.018326985336234	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
accuracy	2.931160020799181	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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.968328316311116	(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))
accuracy	17.99831406333953	(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))
accuracy	31.470803947960864	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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	4.28708992007705	(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)))
accuracy	29.749667149600935	(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
accuracy	32.35216052408867	#s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))
accuracy	47.77213124237375	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))))
accuracy	0.03515625	(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
accuracy	0.16015625	(.f64 #s(literal -1/6 binary64) (.f64 th th))
accuracy	31.697678187129874	#s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th))
accuracy	45.550954933321236	#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.20150375976844204	(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy	0.25	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
accuracy	0.28515625	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
accuracy	2.7157317044752585	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))

Samples

324.0ms	105×	2	valid
104.0ms	79×	1	valid
58.0ms	72×	0	valid

Compiler

Compiled 587 to 86 computations (85.3% saved)

Precisions

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

ival-cos: 120.0ms (29.7% of total)

ival-mult: 95.0ms (23.5% of total)

ival-sqrt: 44.0ms (10.9% of total)

adjust: 37.0ms (9.2% of total)

ival-add: 27.0ms (6.7% of total)

ival-sin: 27.0ms (6.7% of total)

ival-div: 26.0ms (6.4% of total)

const: 8.0ms (2% of total)

ival-pow2: 8.0ms (2% of total)

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

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

exact: 1.0ms (0.2% of total)

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

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

series162.0ms (1.1%)

Memory

13.4MiB live, 156.9MiB allocated

Counts

30 → 648

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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 #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 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<representation binary64>) () ())
#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())
#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<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>) () ())
#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<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>) () ())
#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 (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<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 (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* -1/6 (pow ky 2)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (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 (* -1/2 (* (pow ky 2) (sin th))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf kx) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/12 (pow ky 2))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (+ (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* (pow th 2) (+ (* -1/5040 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/10080 (pow ky 2))))))))))))) (taylor 0 th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (taylor -inf th) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (sin th)) (taylor 0 ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (patch (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -5/12 (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -5/12 (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -5/12 (pow ky 2))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -5/12 (pow ky 2)) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -5/12 (pow ky 2)) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12)) (taylor -inf ky) (#s(alt (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64))) (patch (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 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)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))))) (patch #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))))) (patch (.f64 ky #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))) #<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 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 2 (* -2/3 (pow ky 2)))) (taylor 0 ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3)))) (taylor 0 ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<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 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))) (taylor inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))) (taylor inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))) (taylor inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))) (taylor inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))) (taylor -inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))) (taylor -inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))) (taylor -inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))) (taylor -inf ky) (#s(alt (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt 1/2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2)))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<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 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2)))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2))))))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2))))))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<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>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))) (patch #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx) (taylor inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx)) (taylor -inf kx) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/12 (/ (pow ky 2) (pow kx 3))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (+ (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/10080 (/ (pow ky 2) (pow kx 3))))))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) kx) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx)) (taylor 0 ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3)) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3)) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2)))))) (taylor -inf ky) (#s(alt (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) (patch (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx))) #<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>) () ())) ())
#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 (pow ky 2) (taylor 0 ky) (#s(alt (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/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 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* ky (sqrt 2)) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())

Calls

162 calls:

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

simplify379.0ms (2.7%)

Memory

-21.2MiB live, 450.2MiB allocated

Algorithm

1×	egg-herbie

Rules

8 258×	`lower-fma.f64`
8 258×	`lower-fma.f32`
7 112×	`lower-*.f64`
7 112×	`lower-*.f32`
6 938×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1170	16509
1	4017	15835
0	8349	14879

Stop Event

1×	iter limit
1×	node limit

Counts

648 → 644

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
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ (* ky (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))
(* -1/2 (* (pow ky 2) (sin th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/12 (pow ky 2)))))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))))))))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (+ (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* (pow th 2) (+ (* -1/5040 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/10080 (pow ky 2)))))))))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(* (pow kx 2) (sin th))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
1
(+ 1 (* -5/12 (pow ky 2)))
(+ 1 (* -5/12 (pow ky 2)))
(+ 1 (* -5/12 (pow ky 2)))
(* -5/12 (pow ky 2))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(* -5/12 (pow ky 2))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(/ (* 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 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))))) (/ (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))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(+ 1/2 (* -1/2 (cos (* -2 ky))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (pow kx 2)))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(* (sin th) (sqrt 1/2))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2))))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2))))))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
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)
(/ (sin th) (sin kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx)
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx)
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(/ (* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/12 (/ (pow ky 2) (pow kx 3))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (+ (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/10080 (/ (pow ky 2) (pow kx 3))))))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (sin th) kx)
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow 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))))))))
(* 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))))
(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)))))
(* ky (sqrt 2))
(* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2)))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))

Outputs
(sin ky)
(sin.f64 ky)
(+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 kx kx) (sin.f64 ky)) (sin.f64 ky))
(+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (*.f64 kx kx) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (sin.f64 ky))
(+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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 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 #s(literal 1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (sin.f64 kx))
(+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (/.f64 (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 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
(* 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)
(/ (* 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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 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/12 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 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 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.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 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 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))))) (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 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) (+.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) (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))))) (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 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 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 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (neg.f64 (.f64 ky ky)) (/.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))))
(.f64 ky (fma.f64 (.f64 ky ky) (-.f64 (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (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))))) (neg.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (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 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (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)))) (+.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/12 binary64) (.f64 (sin.f64 kx) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))) (+.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))))))) (+.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(* (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 #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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 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 (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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 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/12 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 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 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.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 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 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))))) (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 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) (+.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) (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))))) (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 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 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
(* 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
(* 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 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))
(* -1/2 (* (pow ky 2) (sin th)))
(.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))
(.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))
(.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* (pow kx 2) (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))))
(* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (*.f64 ky ky))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/12 (pow ky 2)))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))))))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (.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/240 binary64))) (.f64 (*.f64 ky ky) #s(literal 1/12 binary64))))))))
(* th (+ (* -1/2 (pow ky 2)) (+ (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) (* (pow th 2) (+ (* -1/6 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (+ (* 1/12 (pow ky 2)) (* (pow th 2) (+ (* -1/240 (pow ky 2)) (+ (* 1/120 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* (pow th 2) (+ (* -1/5040 (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/10080 (pow ky 2)))))))))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal -1/240 binary64) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.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/10080 binary64))) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))))))) (.f64 (.f64 kx kx) (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))))
(fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)))
(* (pow kx 2) (sin th))
(.f64 (.f64 kx kx) (sin.f64 th))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (*.f64 kx kx) (sin.f64 th)))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (*.f64 kx kx) (sin.f64 th)))
(+ (* (pow kx 2) (sin th)) (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))))
(fma.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 (*.f64 kx kx) (sin.f64 th)))
(* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))
(.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th)))))
(.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
(* (pow ky 2) (+ (* -1/2 (sin th)) (+ (* -5/12 (* (pow kx 2) (sin th))) (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
(.f64 (.f64 ky ky) (fma.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64)) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (.f64 ky ky))))
1
#s(literal 1 binary64)
(+ 1 (* -5/12 (pow ky 2)))
(fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))
(+ 1 (* -5/12 (pow ky 2)))
(fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))
(+ 1 (* -5/12 (pow ky 2)))
(fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))
(* -5/12 (pow ky 2))
(.f64 (.f64 ky ky) #s(literal -5/12 binary64))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 binary64)))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 binary64)))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 binary64)))
(* -5/12 (pow ky 2))
(.f64 (.f64 ky ky) #s(literal -5/12 binary64))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 binary64)))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 binary64)))
(* (pow ky 2) (- (/ 1 (pow ky 2)) 5/12))
(.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 ky ky)) #s(literal -5/12 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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.f64 (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 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 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/12 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (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)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 8 binary64)))))) (fma.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 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 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (/.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 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 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))))) (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 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) (+.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) (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))))) (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 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 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 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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (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/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky (.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (*.f64 ky ky))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky (.f64 ky ky)))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(.f64 ky (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(.f64 th (.f64 ky (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(.f64 th (fma.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))) (.f64 (.f64 th th) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 ky (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/10080 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky)))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 (.f64 kx kx) ky) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky))))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 ky (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th))))) (.f64 ky (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky))))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 (.f64 kx kx) ky) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)) #s(literal 7/360 binary64))) (.f64 ky (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)))))) (.f64 ky (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky))))) (.f64 kx (*.f64 kx kx)))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 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)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 kx kx)))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 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/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(* 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 #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))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))
(+.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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (sin.f64 th)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (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 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (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/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 ky) (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* 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 #s(literal -2 binary64) (/.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 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -2 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))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/3 binary64) (/.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/6 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))))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -2 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))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 #s(literal 1/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))))) (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 (sin.f64 th) (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/12 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (.f64 #s(literal -1/60 binary64) (/.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/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))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -1/6 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))))))))) (.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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* 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) (+.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)))))))) (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) (+.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)))))))) (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 (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)))))))))))
(* 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) (+.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 th th) (.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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) (+.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)))))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* (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) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* 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 #s(literal -2 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))))) (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 (.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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal 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))))))) (.f64 (.f64 #s(literal -1/6 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 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 #s(literal -2 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))))) (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/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))))) (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 th (+.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/12 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (.f64 #s(literal -1/60 binary64) (/.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 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(literal 1/2 binary64) (/.f64 (.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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -1/6 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 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 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)))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -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 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* th (sin ky)) (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 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) th) (.f64 (sin.f64 ky) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* th (sin ky)) (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 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (sin.f64 ky) th) (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/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 th (.f64 (sin.f64 ky) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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)))))))))
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* ky th)
(*.f64 ky th)
(* ky (+ th (* -1/6 (* (pow ky 2) th))))
(.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 ky ky) th) th))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* 1/120 (* (pow ky 2) th))))))
(.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))
(* ky (+ th (* (pow ky 2) (+ (* -1/6 th) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) th)) (* 1/120 th)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 #s(literal -1/6 binary64) th)) th))
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* th (sin ky))
(*.f64 (sin.f64 ky) th)
(* 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/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+.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 ky #s(literal -2 binary64))))))
(+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))
(+.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 ky #s(literal -2 binary64))))))
(* (sin th) (sqrt 1/2))
(*.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/72 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 7/360 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/72 binary64) (fma.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/12 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 7/360 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 31/15120 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/1440 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 th) #s(literal 7/360 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #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/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (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 ky #s(literal -2 binary64)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (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 ky #s(literal -2 binary64)))))))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64)))))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2))))))
(fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 7/720 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal -1/72 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (*.f64 ky ky) (+.f64 (/.f64 #s(literal -7/4320 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (fma.f64 #s(literal -1/5040 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 31/30240 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/1440 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 7/720 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal -1/72 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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)
(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 (.f64 kx kx) #s(literal 2/45 binary64) #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))
(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 #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))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 (sin.f64 th) (.f64 (sin.f64 kx) (.f64 ky ky))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 ky ky) (sin.f64 kx)) #s(literal -1/6 binary64) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/10080 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/12 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 #s(literal 1/6 binary64) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th)) #s(literal 7/360 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 th))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx)
(.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/.f64 (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))) kx)
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/.f64 (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))) kx)
(/ (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2))) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) kx)
(/.f64 (fma.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (*.f64 kx kx))) kx)
(/ (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))) kx)
(.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (sin.f64 th)) (.f64 kx kx))) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (neg.f64 kx))
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (sin.f64 th)) (.f64 kx kx))) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (neg.f64 kx))
(* -1 (/ (+ (* -1 (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))))) (* 1/2 (/ (* (pow ky 2) (sin th)) (pow kx 2)))) kx))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (sin.f64 th)) (.f64 kx kx))) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (neg.f64 kx))
(/ (* th (+ (* -1/2 (pow ky 2)) (* (pow kx 2) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 ky ky)))) (.f64 kx (*.f64 kx kx)))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/12 (/ (pow ky 2) (pow kx 3))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (.f64 kx (.f64 kx kx))))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow kx 3))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (+ (* 1/12 (/ (pow ky 2) (pow kx 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow kx 3))) (+ (* 1/120 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx)) (* 1/10080 (/ (pow ky 2) (pow kx 3))))))))))) (/ (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2)))) kx))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/240 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/10080 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 ky ky) #s(literal -5/12 binary64)) #s(literal 1/120 binary64)) kx))) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (* (sin th) (+ 1 (+ (* -1/4 (pow ky 2)) (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(/ (sin th) kx)
(/.f64 (sin.f64 th) kx)
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (/.f64 (.f64 #s(literal -5/12 binary64) (sin.f64 th)) kx)) (/.f64 (sin.f64 th) kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (/.f64 (.f64 #s(literal -5/12 binary64) (sin.f64 th)) kx)) (/.f64 (sin.f64 th) kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (* -5/12 (/ (sin th) kx)))) (/ (sin th) kx))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (/.f64 (.f64 #s(literal -5/12 binary64) (sin.f64 th)) kx)) (/.f64 (sin.f64 th) kx))
(/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3))
(.f64 (.f64 ky ky) (/.f64 (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(/ (* (pow ky 2) (+ (* -1/2 (sin th)) (* -5/12 (* (pow kx 2) (sin th))))) (pow kx 3))
(.f64 (.f64 ky ky) (/.f64 (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 kx (.f64 kx kx))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow kx 3))) (+ (* -5/12 (/ (sin th) kx)) (/ (sin th) (* kx (pow ky 2))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (.f64 kx (.f64 kx kx))) (fma.f64 #s(literal -5/12 binary64) (/.f64 (sin.f64 th) kx) (/.f64 (sin.f64 th) (.f64 kx (.f64 ky ky))))))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #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 #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))
(* 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* -2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* -2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* -2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #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 #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/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))))
(fma.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* -2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* -2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* -2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* -2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* -2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* -2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* -2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* -2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* -2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* -2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* -2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* -2 kx))) 3)))) (- 1 (cos (* -2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* -2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* -2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* -2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* -2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* -2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* -2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal -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 -4 binary64) (.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (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 -4 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 #s(literal -2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 #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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 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) (+.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))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* -2 ky))) (* 1/2 (- 1 (cos (* -2 kx))))))))
(sqrt.f64 (/.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 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(* 2 (pow ky 2))
(.f64 #s(literal 2 binary64) (.f64 ky ky))
(* (pow ky 2) (+ 2 (* -2/3 (pow ky 2))))
(.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* 4/45 (pow ky 2)) 2/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 4/45 binary64) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(* (pow ky 2) (+ 2 (* (pow ky 2) (- (* (pow ky 2) (+ 4/45 (* -2/315 (pow ky 2)))) 2/3))))
(.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/315 binary64) #s(literal 4/45 binary64)) #s(literal -2/3 binary64)) #s(literal 2 binary64)))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (* 2 ky)))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(- 1 (cos (neg (* -2 ky))))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))))
(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 #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 #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))
(* ky (sqrt 2))
(*.f64 ky (sqrt.f64 #s(literal 2 binary64)))
(* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2)))))
(.f64 ky (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/1260 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (+.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 ky #s(literal -2 binary64)))))))

rewrite317.0ms (2.2%)

Memory

70.4MiB live, 467.8MiB allocated

Rules

3 996×	`lower-*.f32`
3 966×	`lower-*.f64`
3 302×	`lower-fma.f32`
3 286×	`lower-fma.f64`
2 782×	`lower-pow.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	93	590
0	152	572
1	554	534
2	4191	519
0	8262	497

Stop Event

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

Counts

30 → 554

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

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

eval224.0ms (1.6%)

Memory: -2.4MiB live, 551.0MiB allocated
Compiler: Compiled 40 966 to 3 630 computations (91.1% saved)

prune391.0ms (2.8%)

Memory

-8.0MiB live, 824.0MiB allocated

Pruning

84 alts after pruning (80 fresh and 4 done)

	Pruned	Kept	Total
New	1 248	49	1 297
Fresh	10	31	41
Picked	3	2	5
Done	0	2	2
Total	1 261	84	1 345

Accuracy

100.0%

Counts

1 345 → 84

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.5%	(/.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)))))))
	5.3%	(/.f64 (*.f64 (sin.f64 kx) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
	79.6%	(/.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)))
	15.3%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 th))
	48.3%	(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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))
▶	99.4%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th))
	28.8%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
	28.5%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	79.6%	(.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))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.3%	(.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)))
	51.7%	(.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))
	79.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (/.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)))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	79.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	24.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	4.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))))) (sin.f64 th))
	7.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 #s(literal 2 binary64) (.f64 ky ky))))) (sin.f64 th))
	28.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
▶	7.4%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th))
	8.1%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	46.5%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	46.1%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	79.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
	5.5%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 kx)) (sin.f64 th))
	79.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	88.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	40.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	31.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))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sin.f64 th))
	31.7%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky))) (sin.f64 th))
	31.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sin.f64 th))
	41.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
▶	42.0%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	40.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	41.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	31.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky)) (sin.f64 th))
	79.4%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	5.5%	(*.f64 (sin.f64 kx) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
	22.2%	(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin 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))) (sin.f64 th))
	25.9%	(*.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	6.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sin.f64 th))
	10.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 th))
	30.2%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	24.7%	#s(approx (* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	46.8%	#s(approx (* (/ (/ 1 (/ 1 (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.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
	4.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))) (.f64 kx (.f64 kx kx))))))
	8.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 kx kx) (sin.f64 th))) (.f64 kx (.f64 kx kx))))))
	5.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 ky ky))))) (.f64 kx (*.f64 kx kx))))))
	5.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))) (.f64 kx (*.f64 kx kx))))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (/.f64 (sin.f64 th) kx)))))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))
	8.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (.f64 kx (.f64 kx kx))))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
	8.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
✓	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	7.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* ky (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx))))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))))
	15.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
	14.9%	#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.1%	#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)))
	3.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (fma.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) #s(literal -1/216 binary64))) (.f64 th (.f64 th th))) (fma.f64 th (-.f64 th (.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))))) (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (*.f64 th th))) #s(literal 1/36 binary64))))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
	15.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	4.2%	#s(approx (* (/ (sin ky) (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))))))
▶	8.1%	#s(approx (* (/ (sin ky) (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))))))
	30.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
	31.2%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	40.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (/.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)))))))
✓	40.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))))))
	40.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #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))))))))
	40.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))) (/.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)) (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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64)))))))))
	20.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.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)))))))))
	19.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))))))
	20.5%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))))))
	15.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	17.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 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))))))))))
	17.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 kx kx))))))))
	17.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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))))))))))
	15.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) th) 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)))))))
	14.9%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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)))))))))

Compiler

Compiled 4 298 to 2 623 computations (39% saved)

simplify253.0ms (1.8%)

Memory

14.3MiB live, 394.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

13 306×	`lower-fma.f32`
13 296×	`lower-fma.f64`
3 660×	`lower-*.f32`
3 636×	`lower-*.f64`
2 580×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	796
0	135	749
1	251	737
2	564	724
3	1455	678
4	2390	666
5	3528	666
6	6671	666
0	8289	636

Stop Event

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

Calls

Call 1

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

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

localize485.0ms (3.4%)

Memory

-24.9MiB live, 783.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.3203282350025592	(fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64))
accuracy	2.931160020799181	(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))))
accuracy	14.968328316311116	(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
accuracy	30.578223406203	#s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
accuracy	0.41244125976844204	(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
accuracy	0.4459762695368841	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th))
accuracy	1.0	(/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))
accuracy	30.480016824588947	#s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.201503759768442	(/.f64 (sin.f64 th) (sin.f64 kx))
accuracy	1.0525818288521571	(.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
accuracy	39.98588466998476	#s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))
accuracy	47.77213124237375	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
accuracy	0.15234375	(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
accuracy	30.801819230301238	#s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th))))
accuracy	31.697678187129874	#s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))))
accuracy	45.550954933321236	#s(approx (* (/ (sin ky) (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.125	(/.f64 #s(literal 1 binary64) (sin.f64 ky))
accuracy	0.140625	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th))
accuracy	0.171875	(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
accuracy	0.25	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))

Samples

199.0ms	106×	2	valid
102.0ms	78×	1	valid
48.0ms	72×	0	valid

Compiler

Compiled 542 to 81 computations (85.1% saved)

Precisions

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

ival-mult: 64.0ms (21.9% of total)

ival-cos: 49.0ms (16.7% of total)

adjust: 34.0ms (11.6% of total)

ival-sin: 29.0ms (9.9% of total)

ival-add: 28.0ms (9.6% of total)

ival-div: 26.0ms (8.9% of total)

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

const: 18.0ms (6.2% of total)

ival-hypot: 8.0ms (2.7% of total)

ival-pow2: 8.0ms (2.7% of total)

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

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

exact: 1.0ms (0.3% of total)

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

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

series41.0ms (0.3%)

Memory

24.9MiB live, 70.4MiB allocated

Counts

25 → 504

Calls

Call 1

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

Outputs
#s(alt ky (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* -1/6 (pow ky 2)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (sin ky) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (patch (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sin th) (taylor 0 kx) (#s(alt (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) (patch (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ ky (sin kx)) (taylor 0 ky) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (patch (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 ky) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* 1/6 (pow ky 2))) ky) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<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 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sin ky)) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (patch (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #<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 (/ (* 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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) (patch #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))))) #<representation binary64>) () ())) ())
#s(alt (/ (* ky (sin th)) (sin kx)) (taylor 0 ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<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 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx))))))) (taylor -inf ky) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))))))))))) (taylor 0 th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf th) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))) (taylor -inf kx) (#s(alt (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) (patch (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor 0 ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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 (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx)))))) (taylor -inf ky) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx)))))) (taylor 0 th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf th) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3))) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3)) (taylor 0 kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))) (taylor -inf kx) (#s(alt #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) (patch #s(approx (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx))) #<representation binary64>) () ())) ())
#s(alt (/ th (sin kx)) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* -1/6 (/ (pow th 2) (sin kx))) (/ 1 (sin kx)))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sin kx))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx)))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sin kx))) (* 1/120 (/ 1 (sin kx))))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx)))) (taylor 0 th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf th) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) kx) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sin th) (* 1/6 (* (pow kx 2) (sin th)))) kx) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sin th) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sin th) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx) (taylor 0 kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (/ (sin th) (sin kx)) (taylor -inf kx) (#s(alt (/.f64 (sin.f64 th) (sin.f64 kx)) (patch (/.f64 (sin.f64 th) (sin.f64 kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt 2) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2)))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/60 (/ (pow ky 4) (sqrt 2))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/60 (/ (pow ky 4) (sqrt 2))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ -1/3 (sqrt 2)) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))) (taylor 0 ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/60 (/ (pow ky 2) (sqrt 2))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/60 (/ (pow ky 2) (sqrt 2))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2)))))) (taylor -inf ky) (#s(alt (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sin th) (sqrt 1/2)) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2)))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))))))) (taylor 0 ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<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 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))))))) (taylor 0 th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor -inf th) (#s(alt (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) (patch (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2)))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2))))))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2))))))))) (taylor 0 ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (taylor inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))))) (taylor -inf ky) (#s(alt (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky)))))))))))) (taylor 0 kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))) (taylor -inf kx) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))))))))) (taylor 0 ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<representation binary64>) () ())) ())
#s(alt (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (taylor -inf ky) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 ( -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 2 (- 1 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* ky (sqrt 2)) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2))))))) (taylor 0 ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))) (taylor inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky)))))))) (taylor -inf ky) (#s(alt #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (sqrt (+ (* (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<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 #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 ky)))) (taylor inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 ky))))) (taylor -inf ky) (#s(alt #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) (patch #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64)))) #<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 -1/3 (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2/45 (pow ky 2)) 1/3) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2/45 (pow ky 2)) 1/3) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2/45 (pow ky 2)) 1/3) (taylor 0 ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2/45 (pow ky 2)) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2/45 (pow ky 2)) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2))))) (taylor -inf ky) (#s(alt (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (patch (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())

Calls

126 calls:

Time	Variable		Point	Expression
1.0ms	ky	@	inf	(+ (* (* ky ky) (+ (* 1/2 (/ (* (* ky ky) 1/30) (sqrt 2))) (/ -1/3 (sqrt 2)))) (sqrt 2))
1.0ms	ky	@	0	(+ (* (* ky ky) (+ (* 1/2 (/ (* (* ky ky) 1/30) (sqrt 2))) (/ -1/3 (sqrt 2)))) (sqrt 2))
0.0ms	ky	@	0	(+ (* 1/2 (/ (* (* ky ky) 1/30) (sqrt 2))) (/ -1/3 (sqrt 2)))
0.0ms	kx	@	0	(/ (sin th) (sin kx))
0.0ms	kx	@	-inf	(/ (sin th) (sin kx))

simplify320.0ms (2.3%)

Memory

-2.0MiB live, 406.7MiB allocated

Algorithm

1×	egg-herbie

Rules

8 964×	`lower-fma.f64`
8 964×	`lower-fma.f32`
7 374×	`lower-+.f64`
7 374×	`lower-+.f32`
6 504×	`lower-*.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	998	13875
1	3312	13342
0	8213	12548

Stop Event

1×	iter limit
1×	node limit

Counts

504 → 501

Calls

Call 1

Inputs
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(sin ky)
(/ (* ky (sin th)) (sin kx))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(sin th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ ky (sin kx))
(* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
1
(+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))
(+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(/ 1 ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ 1 (sin ky))
(/ (* 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))
(/ (* 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 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))))) (/ (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))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(/ (sin th) (sin kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(/ th (sin kx))
(* th (+ (* -1/6 (/ (pow th 2) (sin kx))) (/ 1 (sin kx))))
(* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sin kx))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))
(* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sin kx))) (* 1/120 (/ 1 (sin kx))))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) kx)
(/ (+ (sin th) (* 1/6 (* (pow kx 2) (sin th)))) kx)
(/ (+ (sin th) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)
(/ (+ (sin th) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(/ (sin th) (sin kx))
(sqrt 2)
(+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2))))
(+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))
(+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))
(* 1/60 (/ (pow ky 4) (sqrt 2)))
(* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(* 1/60 (/ (pow ky 4) (sqrt 2)))
(* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(/ -1/3 (sqrt 2))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(* 1/60 (/ (pow ky 2) (sqrt 2)))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* 1/60 (/ (pow ky 2) (sqrt 2)))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(* (sin th) (sqrt 1/2))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2))))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(sqrt 1/2)
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2))))))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))
(* th (+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/ 2 (- 1 (cos (* 2 kx))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(* ky (sqrt 2))
(* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2)))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(pow ky 2)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (* 2 ky))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(+ 1/2 (* -1/2 (cos (neg (* -2 ky)))))
(* 2 (pow 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))))
-1/3
(- (* 2/45 (pow ky 2)) 1/3)
(- (* 2/45 (pow ky 2)) 1/3)
(- (* 2/45 (pow ky 2)) 1/3)
(* 2/45 (pow ky 2))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(* 2/45 (pow ky 2))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))

Outputs
ky
(* ky (+ 1 (* -1/6 (pow ky 2))))
(fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)
(* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))
(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)
(/ (* 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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #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 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (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 #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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (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))))))
(/ 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 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (neg.f64 (.f64 ky ky))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.f64 ky ky) (-.f64 (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/12 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 ky (sin.f64 kx)))
(* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))
(fma.f64 ky (.f64 (.f64 ky ky) (-.f64 (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (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 (.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 #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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (/.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (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 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 (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))))))
(/ 1 ky)
(/.f64 #s(literal 1 binary64) ky)
(/ (+ 1 (* 1/6 (pow ky 2))) ky)
(/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 7/360 binary64) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)
(/.f64 (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal 31/15120 binary64) #s(literal 7/360 binary64)) #s(literal 1/6 binary64)) #s(literal 1 binary64)) ky)
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ 1 (sin ky))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(/ (* 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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #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 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (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 #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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (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 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
(sin th)
(sin.f64 th)
th
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* th (+ 1 (* -1/6 (pow th 2))))
(fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* (pow th 3) (- (/ 1 (pow th 2)) 1/6))
(.f64 (.f64 th (.f64 th th)) (+.f64 (/.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 th (.f64 th th)) (neg.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(.f64 (.f64 th (.f64 th th)) (neg.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))
(.f64 (.f64 th (.f64 th th)) (neg.f64 (+.f64 #s(literal 1/6 binary64) (/.f64 #s(literal -1 binary64) (.f64 th th)))))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(* -1/6 (pow th 3))
(.f64 #s(literal -1/6 binary64) (.f64 th (*.f64 th th)))
(/ (* 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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (/.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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #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 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1/12 binary64) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (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 #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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(sin th)
(sin.f64 th)
(+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #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 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (.f64 (sin.f64 ky) th))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (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))))))
(/ (* 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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (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 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 ky (.f64 ky ky)))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (*.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (*.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky (.f64 ky ky)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (*.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 3) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 ky (.f64 ky ky)))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* -1 (* (pow ky 3) (+ (* -1 (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (* -1 (/ (sin th) (* (pow ky 2) (sin kx)))))))
(.f64 (neg.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx)))))) (neg.f64 (.f64 ky (*.f64 ky ky))))
(* ky (* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))))
(.f64 ky (fma.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) (sin.f64 kx))) (/.f64 th (sin.f64 kx))))
(* th (+ (* ky (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))))
(.f64 th (.f64 ky (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))) (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3)))))))))
(.f64 th (fma.f64 (.f64 th th) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (fma.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (*.f64 ky ky)) (sin.f64 kx))) (/.f64 ky (sin.f64 kx)))))
(* th (+ (* ky (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx))))) (* (pow th 2) (+ (* ky (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (* (pow th 2) (+ (* ky (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3)))))) (* ky (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 ky (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/10080 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))) (fma.f64 ky (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) (sin.f64 kx))) (/.f64 ky (sin.f64 kx)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* -1/2 (/ (* (pow ky 3) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 (.f64 kx kx) ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 ky (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 (.f64 (.f64 kx kx) ky) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (sin.f64 th)) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 3) (sin th))) (* (pow kx 2) (+ (* ky (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))) (* (pow kx 2) (+ (* ky (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (* (pow kx 2) (* ky (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2)))))))))))))) (pow kx 3))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 th) (.f64 ky (.f64 ky ky))) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 (.f64 kx kx) ky) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 th)) #s(literal 7/360 binary64))) (.f64 ky (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (sin.f64 th)) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))))) (.f64 ky (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))))))) (.f64 kx (.f64 kx kx)))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* ky (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx))))
(.f64 ky (fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx)))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (sin.f64 th) (sin.f64 kx)))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx)))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (/ (sin th) (* (pow ky 2) (sin kx))))))
(.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (.f64 (.f64 ky ky) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (/ 1 (sin kx)))))
(fma.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (*.f64 ky ky)) (sin.f64 kx))) (/.f64 th (sin.f64 kx)))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx)))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(* th (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* -1/6 (/ (pow ky 2) (sin kx))) (+ (* (pow th 2) (+ (* -1/6 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (+ (* 1/12 (/ (pow ky 2) (pow (sin kx) 3))) (* (pow th 2) (+ (* -1/240 (/ (pow ky 2) (pow (sin kx) 3))) (+ (* 1/120 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* (pow th 2) (+ (* -1/5040 (/ (+ 1 (* -1/6 (pow ky 2))) (sin kx))) (* 1/10080 (/ (pow ky 2) (pow (sin kx) 3))))))))))) (/ 1 (sin kx))))))
(.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/10080 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) #s(literal -1/6 binary64)) (sin.f64 kx)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(* -1/2 (/ (* (pow ky 2) (sin th)) (pow kx 3)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (sin.f64 th)) (.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (sin.f64 th)) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)))) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64))))))) (.f64 kx (.f64 kx kx)))
(/ (+ (* -1/2 (* (pow ky 2) (sin th))) (* (pow kx 2) (+ (* -1/4 (* (pow ky 2) (sin th))) (+ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (* (pow kx 2) (- (+ (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th))))) (* (pow kx 2) (- (* 1/2 (+ (* -41/3024 (* (pow ky 2) (sin th))) (+ (* 13/240 (* (pow ky 2) (sin th))) (* 1/2 (+ (* -1/4 (* (pow ky 2) (sin th))) (* 13/120 (* (pow ky 2) (sin th)))))))) (+ (* -1/36 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))) (* 1/120 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))) (* -1/6 (* (sin th) (+ 1 (* -1/6 (pow ky 2))))))))))) (pow kx 3))
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal 307/7560 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)))) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 th)) #s(literal 7/360 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (sin.f64 th)) #s(literal -17/120 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (sin.f64 th)) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64))))) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (.f64 kx kx)))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (* (sin th) (+ 1 (* -1/6 (pow ky 2)))) (sin kx)))
(fma.f64 (sin.f64 th) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 ky ky) #s(literal 1 binary64)) (sin.f64 kx)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(/ th (sin kx))
(/.f64 th (sin.f64 kx))
(* th (+ (* -1/6 (/ (pow th 2) (sin kx))) (/ 1 (sin kx))))
(fma.f64 th (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 th th)) (sin.f64 kx)) (/.f64 th (sin.f64 kx)))
(* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sin kx))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))
(fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 th th) (sin.f64 kx)) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx)))) (/.f64 th (sin.f64 kx)))
(* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sin kx))) (* 1/120 (/ 1 (sin kx))))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (.f64 th th) (sin.f64 kx)) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (/.f64 #s(literal -1/6 binary64) (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) kx)
(/.f64 (sin.f64 th) kx)
(/ (+ (sin th) (* 1/6 (* (pow kx 2) (sin th)))) kx)
(/.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th)) kx)
(/ (+ (sin th) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) #s(literal 7/360 binary64)) (.f64 #s(literal 1/6 binary64) (sin.f64 th))) (sin.f64 th)) kx)
(/ (+ (sin th) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)
(/.f64 (fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 (fma.f64 (sin.f64 th) #s(literal 1/840 binary64) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 th) #s(literal -7/360 binary64)))) (neg.f64 (.f64 kx kx)) (.f64 (sin.f64 th) #s(literal 7/360 binary64))) (*.f64 #s(literal 1/6 binary64) (sin.f64 th))) (sin.f64 th)) kx)
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(/ (sin th) (sin kx))
(/.f64 (sin.f64 th) (sin.f64 kx))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2))))
(fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))
(fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/60 binary64) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow ky 2) (- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))))
(fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/60 binary64) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* 1/60 (/ (pow ky 4) (sqrt 2)))
(/.f64 (*.f64 #s(literal 1/60 binary64) (pow.f64 ky #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 ky #s(literal 4 binary64))) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 ky #s(literal 4 binary64))) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))))))
(* 1/60 (/ (pow ky 4) (sqrt 2)))
(/.f64 (*.f64 #s(literal 1/60 binary64) (pow.f64 ky #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow ky 4) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 ky #s(literal 4 binary64))) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow ky 4) (- (+ (* 1/60 (/ 1 (sqrt 2))) (/ (sqrt 2) (pow ky 4))) (/ 1/3 (* (pow ky 2) (sqrt 2)))))
(.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 ky #s(literal 4 binary64))) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64)))))))
(/ -1/3 (sqrt 2))
(/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(fma.f64 (/.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/60 binary64) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64))))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(fma.f64 (/.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/60 binary64) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64))))
(- (* 1/60 (/ (pow ky 2) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2))))
(fma.f64 (/.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/60 binary64) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/60 (/ (pow ky 2) (sqrt 2)))
(/.f64 (.f64 #s(literal 1/60 binary64) (.f64 ky ky)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* 1/60 (/ (pow ky 2) (sqrt 2)))
(/.f64 (.f64 #s(literal 1/60 binary64) (.f64 ky ky)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow ky 2) (- (* 1/60 (/ 1 (sqrt 2))) (* 1/3 (/ 1 (* (pow ky 2) (sqrt 2))))))
(.f64 (.f64 ky ky) (-.f64 (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/3 binary64) (.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))))))
(* (sin th) (sqrt 1/2))
(*.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (* 1/12 (/ (sin th) (sqrt 1/2))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 7/360 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/72 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sin th) (sqrt 1/2)) (* (pow ky 2) (+ (* -1/6 (* (sin th) (sqrt 1/2))) (+ (* 1/12 (/ (sin th) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/72 (/ (sin th) (sqrt 1/2))) (+ (* 1/120 (* (sin th) (sqrt 1/2))) (+ (* 1/2 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (* (sin th) (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (+ (* -1/5040 (* (sin th) (sqrt 1/2))) (+ (* 1/1440 (/ (sin th) (sqrt 1/2))) (* 1/2 (/ (* (sin th) (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/72 binary64) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/12 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 7/360 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 th) #s(literal 31/15120 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/1440 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 th) #s(literal 7/360 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 (neg (* -2 ky))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 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 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))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 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 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))))) (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 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (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) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))) (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)))) (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 ky))))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky))))))))))))))))
(.f64 th (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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)))))) (.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)))) (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 (sin.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)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (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 ky)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (* 1/12 (/ 1 (sqrt 1/2))))))
(fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 7/720 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal -1/72 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* (pow ky 2) (+ (* -1/6 (sqrt 1/2)) (+ (* 1/12 (/ 1 (sqrt 1/2))) (* (pow ky 2) (- (+ (* 1/120 (sqrt 1/2)) (+ (* 1/2 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (* (pow ky 2) (+ (* -1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))) (+ (* -1/5040 (sqrt 1/2)) (+ (* 1/1440 (/ 1 (sqrt 1/2))) (* 1/2 (/ (- 1/189 (* 1/12 (/ (- 1/30 (* 1/144 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (sqrt 1/2))))))))) (* 1/72 (/ 1 (sqrt 1/2)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (.f64 ky ky) (+.f64 (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 7/720 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 (*.f64 ky ky) (+.f64 (/.f64 #s(literal -7/4320 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (fma.f64 #s(literal -1/5040 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/1440 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 31/30240 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal -1/72 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 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)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (sin th))) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 (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 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (.f64 kx kx))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (.f64 (sin.f64 ky) (.f64 (.f64 (sin.f64 th) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (* (sin ky) (sin th)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (.f64 (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 ky) (sin.f64 th)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sin.f64 th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.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 -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 th) (fma.f64 #s(literal -1 binary64) (/.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 #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 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 th) (+.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 -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) #s(literal -1/60 binary64) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 th) (+.f64 (+.f64 (/.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 -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 (.f64 #s(literal -2 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* th (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))))
(.f64 th (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (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 #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))))) (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 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* (sin ky) (sin th)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (* (pow kx 2) (sin ky)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 (sin.f64 ky) (.f64 kx kx))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 ky) (.f64 kx kx)) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(+ (* (sin ky) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* (pow kx 2) (+ (* -1/2 (* (sin ky) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4))))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (* (sin ky) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))) (.f64 (.f64 kx kx) (.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 ky) (.f64 kx kx)) (+.f64 (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 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 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.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 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/120 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))))
(* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (fma.f64 (.f64 ky ky) (fma.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.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 #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 (.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 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (/.f64 #s(literal -1/60 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/5040 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (+.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 -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1/3 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(* (sin ky) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))))
(.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* -1/2 (* (pow kx 2) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* 1/2 (* (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (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 #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))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(+ (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (* (pow kx 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (* (pow kx 2) (+ (* -1/2 (* (* (pow kx 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (+ 1/2 (* -1/2 (cos (* 2 ky)))))) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))))) (* 1/2 (* (sqrt (+ 1/2 (* -1/2 (cos (* 2 ky))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (* 3/4 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))))))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 3/4 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (+.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #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)))))) (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx)))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))
(+ (* -2 (* (/ (pow ky 2) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))
(fma.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (pow ky 2) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))
(fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 ky ky) (+.f64 (+.f64 (/.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 -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.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 #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 (.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 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx))))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky)))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))
(+ (* -1 (/ (pow kx 2) (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))) (/.f64 (.f64 kx kx) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3)))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (+ (* 2/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 4)))))) (+ (* 1/3 (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 3))))) (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 ky)))) 2)))) (/ 1 (+ 1/2 (* -1/2 (cos (* 2 ky))))))
(fma.f64 (.f64 kx kx) (fma.f64 (.f64 kx kx) (+.f64 (fma.f64 (+.f64 (/.f64 #s(literal 2/45 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (neg.f64 (.f64 kx kx)) (/.f64 #s(literal 1/3 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -1 binary64) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (neg (* -2 kx))))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 2 (- 1 (cos (* 2 kx))))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64)))))
(+ (* -4 (/ (pow ky 2) (pow (- 1 (cos (* 2 kx))) 2))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (.f64 ky ky) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (* 4 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))))) (* 2 (/ 1 (- 1 (cos (* 2 kx))))))
(fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))) (+.f64 (/.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 ky ky)) (+.f64 (/.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 3 binary64))))) (/.f64 #s(literal -4 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(/ 1 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (* 2 kx)))))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))
(* ky (sqrt 2))
(*.f64 ky (sqrt.f64 #s(literal 2 binary64)))
(* ky (+ (sqrt 2) (* -1/3 (/ (pow ky 2) (sqrt 2)))))
(.f64 ky (fma.f64 #s(literal -1/3 binary64) (/.f64 (.f64 ky ky) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* 1/2 (/ (* (pow ky 2) (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/3 (/ 1 (sqrt 2)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* ky (+ (sqrt 2) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 2/315 (* -1/3 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (pow (sqrt 2) 2))))) (sqrt 2))) (* 1/2 (/ (- 4/45 (* 1/9 (/ 1 (pow (sqrt 2) 2)))) (sqrt 2))))) (* 1/3 (/ 1 (sqrt 2)))))))
(.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (*.f64 ky ky) #s(literal 1/1260 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/60 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (* 2 ky))) (* 1/2 (- 1 (cos (* 2 ky)))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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 (+ 1/2 (+ (* -1/2 (cos (neg (* -2 ky)))) (* 1/2 (- 1 (cos (neg (* -2 ky))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.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))))
(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))
(* 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))))
-1/3
#s(literal -1/3 binary64)
(- (* 2/45 (pow ky 2)) 1/3)
(fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64))
(- (* 2/45 (pow ky 2)) 1/3)
(fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64))
(- (* 2/45 (pow ky 2)) 1/3)
(fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64))
(* 2/45 (pow ky 2))
(.f64 (.f64 ky ky) #s(literal 2/45 binary64))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))
(* 2/45 (pow ky 2))
(.f64 (.f64 ky ky) #s(literal 2/45 binary64))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))
(* (pow ky 2) (- 2/45 (* 1/3 (/ 1 (pow ky 2)))))
(.f64 (.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))

rewrite298.0ms (2.1%)

Memory

31.1MiB live, 279.4MiB allocated

Rules

3 830×	`lower-*.f32`
3 806×	`lower-*.f64`
3 550×	`lower-fma.f32`
3 540×	`lower-fma.f64`
2 510×	`lower-pow.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	619
0	135	579
1	557	531
2	4495	487
0	8590	473

Stop Event

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

Counts

25 → 365

Calls

Call 1

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

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

eval134.0ms (0.9%)

Memory: -6.6MiB live, 260.3MiB allocated
Compiler: Compiled 28 459 to 2 595 computations (90.9% saved)

prune611.0ms (4.3%)

Memory

-71.0MiB live, 361.6MiB allocated

Pruning

95 alts after pruning (88 fresh and 7 done)

	Pruned	Kept	Total
New	849	17	866
Fresh	4	71	75
Picked	2	3	5
Done	0	4	4
Total	855	95	950

Accuracy

100.0%

Counts

950 → 95

Alt Table

Click to see full alt table

Status	Accuracy	Program
	79.5%	(/.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)))))))
	11.9%	(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
	5.3%	(/.f64 (*.f64 (sin.f64 kx) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
	79.6%	(/.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)))
	15.3%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 th))
✓	99.4%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th))
	28.8%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
	50.9%	(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (sin.f64 th))
	79.6%	(.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))
✓	99.6%	(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sin.f64 th))
	50.3%	(.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)))
	51.7%	(.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))
	79.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (/.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)))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	79.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 th))
	24.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	4.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))))) (sin.f64 th))
	7.1%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 #s(literal 2 binary64) (.f64 ky ky))))) (sin.f64 th))
	12.0%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
	28.5%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	7.4%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (/.f64 (fma.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/60 binary64) (*.f64 ky ky)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th))
	8.1%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	46.5%	(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	46.1%	(.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
	79.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))) (sin.f64 th))
	12.0%	(.f64 (/.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
	5.5%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 kx)) (sin.f64 th))
	12.0%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
	79.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	88.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	40.2%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
	31.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))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sin.f64 th))
	31.7%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky))) (sin.f64 th))
	31.6%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sin.f64 th))
	41.5%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
✓	42.0%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	40.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(approx (+ ( (* ky ky) 2/45) -1/3) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	41.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) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
	31.3%	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
	35.0%	(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky)) (sin.f64 th))
	79.4%	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
	12.0%	(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
	12.0%	(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
	5.5%	(*.f64 (sin.f64 kx) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
	22.2%	(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin 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))) (sin.f64 th))
	25.9%	(*.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	6.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sin.f64 th))
	10.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 th))
	30.2%	(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
	24.7%	#s(approx (* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
	46.8%	#s(approx (* (/ (/ 1 (/ 1 (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)))
	17.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 ky))) ky))
	4.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))) (.f64 kx (.f64 kx kx))))))
	8.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 kx kx) (sin.f64 th))) (.f64 kx (.f64 kx kx))))))
	5.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 ky ky))))) (.f64 kx (*.f64 kx kx))))))
	5.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))) (.f64 kx (*.f64 kx kx))))))
	17.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sin.f64 th))))))
	17.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sin.f64 th)))))
	16.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (/.f64 (sin.f64 th) kx)))))
	15.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))
	8.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (.f64 kx (.f64 kx kx))))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
	8.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
	13.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th)) kx)))))
	15.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 th (sin.f64 kx))))))
✓	28.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	7.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* ky (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx))))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))))
	15.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
	15.0%	#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 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) th)))
	14.9%	#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.1%	#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)))
	3.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (fma.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) #s(literal -1/216 binary64))) (.f64 th (.f64 th th))) (fma.f64 th (-.f64 th (.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))))) (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (*.f64 th th))) #s(literal 1/36 binary64))))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
	10.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
	4.2%	#s(approx (* (/ (sin ky) (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))))))
	8.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) th))))
	8.1%	#s(approx (* (/ (sin ky) (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))))))
✓	8.1%	#s(approx (* (/ (sin ky) (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))))))
	30.1%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
	31.2%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
	40.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (/.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)))))))
✓	40.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))))))
	40.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 ky #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))))))))
	40.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))) (/.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)) (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 #s(literal -2 binary64)))))) #s(literal -1/4 binary64)))))))))
	20.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.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)))))))))
	19.4%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))))))
	20.5%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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)))))))
	15.3%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	17.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 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))))))))))
	17.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 kx kx))))))))
	17.7%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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))))))))))
	15.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.6%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
	15.8%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) th) 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)))))))
	14.9%	#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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)))))))))

Compiler

Compiled 5 126 to 1 972 computations (61.5% saved)

regimes353.0ms (2.5%)

Memory

1.2MiB live, 590.8MiB allocated

Counts

124 → 1

Calls

Call 1

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

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

Calls

9 calls:

42.0ms	(sin.f64 th)
41.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))
40.0ms	(sin.f64 kx)
39.0ms	kx
36.0ms	th

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes387.0ms (2.7%)

Memory

-0.6MiB live, 542.6MiB allocated

Counts

111 → 2

Calls

Call 1

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

Outputs

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

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

Calls

9 calls:

103.0ms	kx
41.0ms	th
40.0ms	(sin.f64 kx)
36.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)))))
35.0ms	(sin.f64 th)

Results

Accuracy	Segments	Branch
99.5%	2	`kx`
99.0%	2	`ky`
89.5%	2	`th`
90.2%	5	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
99.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.0%	3	`(sin.f64 ky)`
99.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.5%	3	`(sin.f64 kx)`
89.5%	3	`(sin.f64 th)`

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes70.0ms (0.5%)

Memory

37.6MiB live, 124.2MiB allocated

Counts

105 → 2

Calls

Call 1

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

Calls

2 calls:

33.0ms	kx
30.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

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

Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes66.0ms (0.5%)

Memory

-14.6MiB live, 89.0MiB allocated

Counts

102 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

30.0ms	kx
26.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

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

Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes63.0ms (0.4%)

Memory

-4.0MiB live, 86.8MiB allocated

Counts

101 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 11 to 9 computations (18.2% saved)

regimes276.0ms (2%)

Memory

-18.6MiB live, 361.8MiB allocated

Counts

97 → 5

Calls

Call 1

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

Calls

9 calls:

32.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)))))
29.0ms	(sin.f64 ky)
28.0ms	kx
28.0ms	(sin.f64 th)
28.0ms	th

Results

Accuracy	Segments	Branch
73.5%	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))`
78.1%	4	`(sin.f64 th)`
78.2%	3	`th`
89.5%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
80.5%	4	`(sin.f64 ky)`
80.6%	4	`(sin.f64 kx)`
81.0%	3	`ky`
79.0%	2	`kx`
81.1%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`

Compiler

Compiled 69 to 51 computations (26.1% saved)

regimes53.0ms (0.4%)

Memory

-8.5MiB live, 41.7MiB allocated

Counts

96 → 5

Calls

Call 1

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

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

Calls

1 calls:

25.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes30.0ms (0.2%)

Memory

41.2MiB live, 41.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 th th) (*.f64 th #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.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 (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 ky ky))))) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))) (.f64 kx (*.f64 kx kx))))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 th (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (/.f64 (sin.f64 th) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (fma.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) #s(literal -1/216 binary64))) (.f64 th (.f64 th th))) (fma.f64 th (-.f64 th (.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))))) (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (*.f64 th th))) #s(literal 1/36 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 kx kx) (sin.f64 th))) (.f64 kx (.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* ky (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx))))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))) (.f64 kx (.f64 kx kx))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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 (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (.f64 kx (.f64 kx kx))))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 ky))) ky))
#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 (* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 #s(approx (/ (/ 1 (/ 1 (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)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sin.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sin.f64 th))))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 #s(literal 2 binary64) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 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))))))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 kx kx))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) th) 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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 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))))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (/.f64 (fma.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/60 binary64) (*.f64 ky ky)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (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 #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))
(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin 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))) (sin.f64 th))
(*.f64 (sin.f64 kx) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 kx) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 kx)) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 ky ky)) (fma.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) (fma.f64 kx kx #s(literal 1/2 binary64)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (/.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (.f64 #s(approx (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (/.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 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(approx (+ ( (* ky ky) 2/45) -1/3) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) ky))) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (*.f64 th th)) th)))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (+ ky ky)))) (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)) #s(literal 1 binary64))))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (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))

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

Calls

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes31.0ms (0.2%)

Memory

7.6MiB live, 52.6MiB allocated

Counts

91 → 5

Calls

Call 1

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

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

1 calls:

25.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes35.0ms (0.2%)

Memory

-29.3MiB live, 59.1MiB allocated

Counts

90 → 5

Calls

Call 1

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

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

27.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes35.0ms (0.2%)

Memory

1.8MiB live, 50.5MiB allocated

Counts

81 → 5

Calls

Call 1

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

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

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes187.0ms (1.3%)

Memory

12.1MiB live, 241.6MiB allocated

Counts

79 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
46.5%	1	`th`
74.7%	3	`(sin.f64 ky)`
63.8%	4	`(sin.f64 kx)`
63.7%	3	`kx`
74.6%	2	`ky`
63.7%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
77.6%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 45 to 34 computations (24.4% saved)

regimes167.0ms (1.2%)

Memory

27.4MiB live, 175.7MiB allocated

Counts

76 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

47.0ms	ky
44.0ms	(sin.f64 th)
29.0ms	(sin.f64 ky)
22.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
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
57.1%	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))`
71.1%	4	`(sin.f64 ky)`
70.9%	3	`ky`
45.3%	3	`(sin.f64 th)`
71.3%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 49 to 35 computations (28.6% saved)

regimes28.0ms (0.2%)

Memory

-35.4MiB live, 53.9MiB allocated

Counts

71 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

19.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes74.0ms (0.5%)

Memory

5.8MiB live, 144.9MiB 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 th th) (*.f64 th #s(literal -1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 #s(literal -1/6 binary64) (.f64 th th)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 (.f64 th (.f64 th #s(literal -1/6 binary64))) th th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (fma.f64 th (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (*.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (+ (* th (* -1/6 (* th th))) th) (.f64 (.f64 th (.f64 th th)) (+.f64 (/.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 (sin th) (.f64 th (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (.f64 th th) #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 ky ky))))) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (fma.f64 th (.f64 th (*.f64 th #s(literal -1/6 binary64))) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (-.f64 (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (.f64 th th))) #s(literal 1/36 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (fma.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))) (neg.f64 th))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (.f64 ky ky) (fma.f64 (.f64 th th) (fma.f64 (.f64 ky ky) #s(literal 1/12 binary64) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)))) (.f64 (.f64 kx kx) (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64))))))) (.f64 kx (*.f64 kx kx))))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 th (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (/.f64 (sin.f64 th) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (/.f64 (fma.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) (.f64 (.f64 th (.f64 th th)) #s(literal -1/216 binary64))) (.f64 th (.f64 th th))) (fma.f64 th (-.f64 th (.f64 th (.f64 th (.f64 th #s(literal -1/6 binary64))))) (.f64 (.f64 (.f64 th (.f64 th th)) (.f64 th (*.f64 th th))) #s(literal 1/36 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 kx kx) #s(literal 1 binary64)) (sin.f64 th)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/12 binary64)) (.f64 kx (.f64 kx kx)))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 kx kx) (sin.f64 th))) (.f64 kx (.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (* ky (+ (* ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx))))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky (.f64 ky ky))) (sin.f64 th)) (.f64 kx (.f64 kx kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th)) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(approx (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (.f64 (.f64 ky ky) (.f64 (sin.f64 th) (fma.f64 #s(literal -5/12 binary64) (.f64 kx kx) #s(literal -1/2 binary64))))) (.f64 kx (.f64 kx kx))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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 (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/12 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 th (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (fma.f64 #s(literal 1/12 binary64) (/.f64 (.f64 ky ky) (.f64 kx (.f64 kx kx))) (.f64 (.f64 th th) (fma.f64 #s(literal 1/120 binary64) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx) (/.f64 (.f64 (.f64 ky ky) #s(literal -1/240 binary64)) (.f64 kx (.f64 kx kx))))))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (sin.f64 th) (sin.f64 ky))) ky))
#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 (* (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 #s(approx (/ (/ 1 (/ 1 (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)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sin.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sin.f64 th))))))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 #s(literal 2 binary64) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #s(literal -1/2 binary64) (cos.f64 (*.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 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))))))))))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2)) (.f64 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 2 binary64)))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 kx kx))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.f64 ky (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))
(.f64 #s(approx ( (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (*.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) th) 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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 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))))))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (fma.f64 (.f64 kx kx) (.f64 (sin.f64 th) (fma.f64 #s(literal -1/4 binary64) (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (sin.f64 th))) (.f64 kx (*.f64 kx kx))))))
#s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 #s(approx ( th (sin ky)) (.f64 ky (fma.f64 (.f64 ky ky) (.f64 th (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) th))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (/.f64 (fma.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/60 binary64) (*.f64 ky ky)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ ( (- 1 (cos (+ ky ky))) 1/2) (+ (* (cos (+ ky ky)) -1/2) 1/2))) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) #s(literal 1/30 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (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 #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))
(.f64 #s(approx (/ (/ 1 (/ 1 (sin ky))) (sqrt (+ (pow (sin 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))) (sin.f64 th))
(*.f64 (sin.f64 kx) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 kx) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(.f64 (sin.f64 ky) (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 th)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky)) (sin.f64 th))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sin.f64 kx)) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))) (sin.f64 th))
(.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th))

Outputs

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

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
53.2%	4	`(sin.f64 ky)`
46.2%	3	`ky`
63.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 25 to 18 computations (28% saved)

regimes94.0ms (0.7%)

Memory

39.8MiB live, 176.2MiB allocated

Counts

69 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 32 to 24 computations (25% saved)

regimes18.0ms (0.1%)

Memory

2.0MiB live, 45.3MiB allocated

Counts

45 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

15.0ms

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

Results

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes80.0ms (0.6%)

Memory

2.8MiB live, 87.9MiB allocated

Counts

44 → 3

Calls

Call 1

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

Outputs

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

4 calls:

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

Results

Accuracy	Segments	Branch
42.9%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
42.9%	2	`kx`
48.9%	3	`(sin.f64 kx)`
55.5%	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 32 to 24 computations (25% saved)

regimes56.0ms (0.4%)

Memory

-6.5MiB live, 94.0MiB allocated

Counts

39 → 2

Calls

Call 1

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

Outputs

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

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

15.0ms

(sin.f64 ky)

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

Compiler

Compiled 40 to 28 computations (30% saved)

regimes106.0ms (0.8%)

Memory

-27.1MiB live, 142.2MiB allocated

Counts

28 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

8 calls:

36.0ms	kx
14.0ms	ky
11.0ms	th
9.0ms	(sin.f64 kx)
9.0ms	(sin.f64 th)

Results

Accuracy	Segments	Branch
35.4%	2	`(sin.f64 ky)`
40.7%	3	`kx`
40.7%	3	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
34.4%	3	`(sin.f64 th)`
35.2%	2	`ky`
40.8%	4	`(sin.f64 kx)`
34.4%	3	`th`
41.6%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 50 to 38 computations (24% saved)

regimes10.0ms (0.1%)

Memory

20.1MiB live, 20.1MiB allocated

Counts

25 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

7.0ms

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

Results

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

regimes12.0ms (0.1%)

Memory

-26.6MiB live, 18.1MiB allocated

Counts

19 → 2

Calls

Call 1

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

Outputs

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

Compiler

Compiled 16 to 11 computations (31.3% saved)

regimes40.0ms (0.3%)

Memory

40.2MiB live, 86.0MiB allocated

Counts

15 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

8.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
5.0ms	(sin.f64 ky)
5.0ms	(sin.f64 kx)
5.0ms	ky
5.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
31.1%	2	`ky`
31.6%	2	`(sin.f64 ky)`
28.8%	1	`(sin.f64 kx)`
33.0%	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))`
28.8%	1	`kx`
28.8%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
33.1%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 60 to 44 computations (26.7% saved)

regimes46.0ms (0.3%)

Memory

-6.6MiB live, 92.8MiB allocated

Counts

12 → 2

Calls

Call 1

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

Outputs

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

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

Results

Accuracy	Segments	Branch
17.6%	2	`kx`
17.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
16.9%	2	`(sin.f64 kx)`
17.7%	2	`ky`
20.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))`
18.1%	2	`(sin.f64 ky)`
15.1%	1	`(sin.f64 th)`
15.1%	1	`th`
19.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 69 to 51 computations (26.1% saved)

regimes3.0ms (0%)

Memory

6.2MiB live, 6.2MiB allocated

Counts

5 → 2

Calls

Call 1

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

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

1 calls:

3.0ms

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

Results

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

Compiler

Compiled 19 to 13 computations (31.6% saved)

regimes22.0ms (0.2%)

Memory

1.4MiB live, 46.4MiB 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 th th) (*.f64 th #s(literal -1/6 binary64))))))

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

Outputs

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

Calls

9 calls:

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

Results

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

Compiler

Compiled 69 to 51 computations (26.1% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.692304598836892e-8	0.0004147276418976754

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.692304598836892e-8	0.0004147276418976754

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch4.0ms (0%)

Memory

-43.8MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.692304598836892e-8	0.0004147276418976754

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	6.692304598836892e-8	0.0004147276418976754

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	8.230984041062842e-18	3.5938309140310984e-10
0.0ms	-0.023082394243008012	7.932353149744639e-302
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	8.230984041062842e-18	3.5938309140310984e-10
0.0ms	-0.06058888325460443	-0.023082394243008012
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	3.9771213207629736e-8	3.2481484034829238e-6
0.0ms	-0.023082394243008012	7.932353149744639e-302
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.4MiB live, 2.4MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	3.2481484034829238e-6	3.77038729479529e-5
0.0ms	-0.023082394243008012	7.932353149744639e-302
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	3.2481484034829238e-6	3.77038729479529e-5
0.0ms	-0.023082394243008012	7.932353149744639e-302
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

3.6MiB live, 3.6MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9913540308091716	0.9991801371992666
0.0ms	8.230984041062842e-18	3.5938309140310984e-10
0.0ms	-0.023082394243008012	7.932353149744639e-302
0.0ms	-1.0	-0.9999999972163317

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	-0.023082394243008012	7.932353149744639e-302

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6943004575371851	0.7288271991365883
0.0ms	-0.7083762886545192	-0.7056911228767851

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6943004575371851	0.7288271991365883
0.0ms	-0.7083762886545192	-0.7056911228767851

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6943004575371851	0.7288271991365883
0.0ms	-0.9999999972163317	-0.9977416974621227

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	-0.023082394243008012	7.932353149744639e-302

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	-0.023082394243008012	7.932353149744639e-302

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	-0.06058888325460443	-0.023082394243008012

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	1.4869450056740314e-85	3.395540108086728e-78

Compiler

Compiled 22 to 19 computations (13.6% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004784496440697715	0.023119026606176447
0.0ms	2.9075582680899917e-179	1.2420463465016875e-177

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	0.004784496440697715	0.023119026606176447

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	1.61185093007282e-120	3.0528497382366105e-116

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	4.853573057451606e-294	3.190366776079237e-290

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	4.853573057451606e-294	3.190366776079237e-290

Compiler

Compiled 22 to 19 computations (13.6% saved)

simplify38.0ms (0.3%)

Memory

21.3MiB live, 65.8MiB allocated

Algorithm

1×	egg-herbie

Rules

92×	`*-commutative_binary64`
20×	`+-commutative_binary64`
12×	`sub-neg_binary64`
6×	`neg-sub0_binary64`
6×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	301	3411
1	357	3411
2	366	3411
3	372	3411
4	375	3411

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 944473296573929/9444732965739290427392 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 (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))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 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 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.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)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (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 -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 944473296573929/18889465931478580854784 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (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 -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 5902958103587057/1180591620717411303424 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (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 ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 5902958103587057/1180591620717411303424 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (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 ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/1152921504606846976 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -4494592428115755/4503599627370496 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (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 5764607523034235/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (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 3499601159652819/17498005798264095394980017816940970922825355447145699491406164851279623993595007385788105416184430592 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) 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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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))))))))) #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 912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) 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/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.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 5764607523034235/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.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 5814709794364855/2907354897182427562197295231552018137414565442749272241125960796722557152453591693304764202855054262243050086425064711734138406514458624 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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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 (/.f64 (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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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 944473296573929/9444732965739290427392 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 (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))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (/.f64 (sin.f64 th) (/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (sin.f64 ky))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (/.f64 (.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 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 (.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))))))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 ky)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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)))
(if (<=.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 944473296573929/9444732965739290427392 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #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 -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 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 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (sin.f64 th) (/.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 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 8962163258467287/9007199254740992 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 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.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)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx)))))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (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 -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 944473296573929/18889465931478580854784 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 944473296573929/18889465931478580854784 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 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 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) kx)))))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1 binary64)) (.f64 (/.f64 (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 -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 5902958103587057/1180591620717411303424 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -1 binary64)) (.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) (fma.f64 kx (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) kx))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 5902958103587057/1180591620717411303424 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (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 ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 5902958103587057/1180591620717411303424 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 5902958103587057/1180591620717411303424 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (.f64 ky (fma.f64 (.f64 ky ky) (fma.f64 (.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (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 ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #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 -1 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 6490371073168535/649037107316853453566312041152512 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) 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 -5764607523034235/288230376151711744 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/1152921504606846976 binary64)) (.f64 (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5764607523034235/1152921504606846976 binary64)) (.f64 (sin.f64 th) (/.f64 #s(approx (sin ky) (fma.f64 ky (.f64 #s(literal -1/6 binary64) (.f64 ky ky)) ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) #s(literal 1/2 binary64))))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (/.f64 #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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1589770668461785/2251799813685248 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) (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)))))) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ ( (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -4494592428115755/4503599627370496 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (.f64 (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))) (sin.f64 ky)) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -4494592428115755/4503599627370496 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (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) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 ky #s(literal -2 binary64))) (.f64 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 3152519739159347/4503599627370496 binary64)) (.f64 (sin.f64 th) (.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky)))))) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64))))))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) (.f64 #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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/1152921504606846976 binary64)) (.f64 (sin.f64 th) #s(approx (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (sqrt.f64 #s(literal 2 binary64)))))) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (.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/288230376151711744 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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/1152921504606846976 binary64)) #s(approx ( (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.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 (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.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 #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/1152921504606846976 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (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 -3602879701896397/72057594037927936 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2)) (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/1152921504606846976 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (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 5764607523034235/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) (/.f64 (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 3499601159652819/17498005798264095394980017816940970922825355447145699491406164851279623993595007385788105416184430592 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) 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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #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))))))))) #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 3499601159652819/17498005798264095394980017816940970922825355447145699491406164851279623993595007385788105416184430592 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) 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/1152921504606846976 binary64)) #s(approx (* (* (sqrt (/ 1 (+ (* (- 1 (cos (+ kx kx))) 1/2) (+ 1/2 (* -1/2 (cos (+ ky ky))))))) (sin ky)) (sin th)) #s(approx (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* kx -2)))) (+ (* -1/2 (cos (* ky -2))) 1/2))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 kx #s(literal -2 binary64)))))) (.f64 ky (.f64 th (sqrt.f64 #s(literal 2 binary64))))))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (+ (* (* kx kx) (* (sin th) (+ (* -1/4 (* ky ky)) (+ (* (* ky ky) -1/6) 1)))) (* (* -1/2 (* ky ky)) (sin th))) (* kx (* kx kx))) (.f64 (sin.f64 th) (/.f64 (fma.f64 (.f64 ky ky) #s(literal -5/12 binary64) #s(literal 1 binary64)) 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/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.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 5764607523034235/1152921504606846976 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 ky #s(approx (+ ( ky (/ (* ky (* -1/2 (sin th))) (pow (sin kx) 3))) (* (+ (* (* ky ky) -1/6) 1) (/ (sin th) (sin kx)))) #s(approx (/ (sin th) (sin kx)) (/.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 5814709794364855/2907354897182427562197295231552018137414565442749272241125960796722557152453591693304764202855054262243050086425064711734138406514458624 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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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 (/.f64 (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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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))))
(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 449423283715579/89884656743115795386465259539451236680898848947115328636715040578866337902750481566354238661203768010560056939935696678829394884407208311246423715319737062188883946712432742638151109800623047059726541476042502884419075341171231440736956555270413618581675255342293149119973622969239858152417678164812112068608 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))))))

soundness1.8s (12.6%)

Memory

-0.1MiB live, 1 444.0MiB allocated

Rules

14 278×	`lower-fma.f64`
14 278×	`lower-fma.f32`
9 170×	`lower-fma.f64`
9 170×	`lower-fma.f32`
8 964×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	345
0	94	331
1	338	306
0	2603	306
0	13	49
0	22	49
1	62	49
2	338	49
3	2902	49
0	8284	34
0	317	2263
1	1011	2214
2	3860	2122
3	7804	2122
0	8107	1974
0	998	13875
1	3312	13342
0	8213	12548
0	1170	16509
1	4017	15835
0	8349	14879
0	93	590
0	152	572
1	554	534
2	4191	519
0	8262	497
0	946	15756
1	3217	15326
0	8077	14312

Stop Event

1×	fuel
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×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Compiler

Compiled 3 455 to 1 176 computations (66% saved)

preprocess249.0ms (1.8%)

Memory

-4.5MiB live, 182.4MiB allocated

Remove

(negabs ky)

(negabs th)

(abs kx)

Compiler

Compiled 4 068 to 478 computations (88.2% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated